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PDA:  A PC-based  Expert  System  for  Analysis  of 
DOE  Nuclear  Energy  Performance  Indicator  Data 

J.  T.  Fong*,  B.  Bernstein**,  and  J.  J.  Filliben*** 


Abstract 

A personal  computer  (PC)-based  expert  system  is  developed  as  a front  end  to  commercially- 
available  MS-DOS-based  software  and  a public-domain  statistical  package  named  DATAPLOT  (v.  92.2). 
Coded  in  micro-PROLOG  (v.  1.4),  the  expert  system  PDA  is  designed  to  (1)  facilitate  the  analysis  of  the 
so-called  performance  indicator  data  by  the  technical  staff  of  the  Office  of  Nuclear  Energy  (NE),  U.S. 
Department  of  Energy  (DOE);  (2)  enhance  the  analysis  and  database  management  capability  of  an 
engineer  or  scientist  through  a series  of  tutorial  exercises;  and  (3)  encourage  the  modification  of  the 
Prolog  code  of  PDA  or  the  English-based  codes  of  the  DATAPLOT  macros  by  users  interested  in 
customizing  the  system  for  new  or  proprietary  applications.  To  achieve  these  objectives,  the  system 
includes  three  special  features:  (i)  A temporary  exit  to  access  any  MS-DOS-based  packages  such  as 
LOTUS-1-2-3,  etc.  (ii)  More  than  twenty  built-in  DATAPLOT  macros  for  a user  to  obtain,  at  a single 
key  stroke,  simple  plots  such  as  histograms,  pie  charts,  Pareto  charts,  C-charts  (count  charts),  P-charts 
(proportion  charts),  lag  plots,  autocorrelation  plots,  box  plots,  scatter  plots,  etc.,  as  well  as  statistical  tests 
to  identify  data  distributions  such  as  normal,  lognormal,  uniform,  logistic,  exponential,  Cauchy,  Poisson, 
Gamma,  Beta,  Weibull,  extreme  value  types  I and  II,  and  binomial,  (iii)  A direct  access  to  DATAPLOT 
for  users  to  write  their  own  macros  to  conduct  a full-range  of  statistical  tests,  analysis,  and  experimental 
design.  The  minimum  requirements  of  the  PC  computing  environment  for  running  PDA  are:  80386SX-16 
CPU,  8/16-MHz,  2MB-RAM,  40MB-Hard  disk,  math-coprocessor,  1.44-MB  3.5"  or  1.2-MB  5.25"  high 
density  floppy  drive,  MS-DOS  3.3,  and  a properly  installed  version  of  DATAPLOT  (v.  92.2). 


Keywords:  Artificial  intelligence;  computational  mathematics;  data  analysis;  DATAPLOT; 

engineering  expert  system;  expert  system;  micro-PROLOG;  nuclear  energy;  PC 
computing;  performance  indicator;  statistical  engineering. 
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Disclaimer 

The  mention  of  computer  systems  or  software  products  in  this  document  implies  neither  approval 
nor  endorsement  of  all  such  systems  or  products  by  the  authors  or  the  institutions  they  are  affiliat^  with. 
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Note  on  Prolog  Copyrighted  Materials  & Version  Conversion 

The  attached  floppy  92330FONG-1  (see  listing  in  Appendix  A),  contains  six  Prolog  (v.  1 .4,  Lisp- 
like Standard  syntax)  system  files  that  are  copyrighted  by  Logic  Programming  Associates  (LPA),  Ltd., 
Studio  4,  The  Royal  Victoria  Patriotic  Bldg.,  Trinity  Road,  London,  SW18  3SX,  United  Kingdom.  The 
names  of  the  six  Standard-syntax  files  are;  APP.MOD;  FIGURE.SYS;  LINKER.SYS;  LOADER. SYS; 
PROLCXj.EXE;  and  PROLOG. SYS.  They  were  contained  in  a micro-PROLOG  software  package 
purchased  in  March  1987  by  one  of  the  authors  (B.  Bernstein)  through  Programming  Logic  Systems,  Inc., 
Milford,  CT,  then  U.S.  distributor  which  has  since  gone  out  of  business. 

On  June  10,  1991,  the  first  author  of  this  report  (J.  Fong)  contacted  Ms.  Carrie  DuBois  of  the 
Quintus  Corporation  of  Palo  Alto,  CA,  the  current  U.S.  distributor  of  Prolog,  for  information  on 
upgrading  the  Bernstein’s  copy  of  micro-Prolog  (v.  1 .4).  Fong  was  told  that  micro-Prolog  has  since  been 
renamed  DOS  Prolog  and  the  new  version  supports  a different  syntax  known  as  the  Edinburgh  syntax. 
Fong  purchased  a copy  of  the  new  DOS  Prolog  (v.  3.0)  and  requested  help  in  version  conversion  as  well 
as  inquired  about  the  status  of  the  above  six  files  regarding  their  distribution  to  unlicensed  Prolog  users 
such  as  the  DOE  staff  for  demonstration,  tutorial,  and  limited  application  purposes. 

On  June  13,  1991,  Fong  was  informed  by  Ms.  DuBois  of  Quintus  Corp.  that  LPA  will  assist  in 
converting  customer’s  Standard  syntax  codes  to  the  Edinburgh  ones.  In  a message  to  Quintus  in  response 
to  Fong’s  request,  Mr.  Brian  Steel  of  LPA,  London,  U.K.,  wrote  that  the  version  conversion 

"depends  on  what  the  program  is  doing.  Anything  which  is  pretty  conventional  Prolog  will  convert 
and  run  first  time  around  90%  of  the  time.  If  the  program  is  heavily  into  struaure-specific  meta- 
programming, there  could  be  some  problems  (but  not  big  ones). 

"The  converter  was  pretty  iruelligeru,  replacing  calls  to  micro-PROLOG  predictates  with 
equivalent  Edinburgh  ones,  and  adjusting  arguments  as  necessary,  but  when  it  got  stuck,  it  simply 
allowed  the  micro-PROLOG  predicate  through,  and  embedded  a warning  comment  in  the  file. 

'Because  the  micro-PROLOG  predicates  still  exist  in  DOS  Prolog,  such  code  works,  and  the 
remaining  conversion  can  be  done  at  leisure  ...  before  attempting  a further  porting  to  386- 
PROLOG,  which  does  *not*  include  the  micro-PROLOG  predicates. 

'The  class  of  programs  where  the  manual  stage  of  conversion  is  a bore  includes  those  which 
expect  program  clauses  to  look  like  lists  of  lists:  a lot  of  list  <->  tuple  conversion,  with  calls  to  - 
..  (univ)  is  required  in  Edinburgh  Prolog,  but  was  completely  unnecessary  in  micro-PROLOG. 

Likewise,  I/O  which  assumes  Standard  (lisp-like)  syntax  for  special  purposes  may  need  a little 
work  porting. ' 

On  Sep.  30,  1991,  Ms.  Diane  Reeve  of  LPA,  London,  U.K.,  sent  Fong  a converter  disk  which  was 
subsequently  used  by  Fong  to  demonstrate  the  version  conversion  of  a simple  test  code  during  a visit  he 
made  to  the  Quintus  Corporation  on  Oct.  14-18,  1991.  During  the  same  visit,  Fong  was  told  that  since 
the  Standard  syntax  of  micro-Prolog  is  no  longer  supported,  Quintus  Corporation  had  no  objection  to  our 
intention  to  distribute  those  six  Standard-syntax  files  for  the  purposes  stated,  pending  a written  permission 
from  LPA  following  a review  of  the  specific  utilization  of  those  files  as  described  in  this  report. 
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Executive  Summary 


Based  on  a proprietary  expert  system  language,  a PC-based  program  named  PDA  is  coded  as  a 
user-friendly  front  end  to  a developmental  statistical  analysis  package  named  DATAPLOT. 

DATAPLOT  is  a general-purpose  statistical  analysis  software  program  undergoing  development 
by  the  National  Institute  of  Standards  and  Technology  (NIST).  PDA  is  designed  to  facilitate  the  technical 
staff  of  the  Office  of  Nuclear  Energy  (NE),  U.  S.  Department  of  Energy  (DOE),  to  conduct  statistical 
analysis  of  the  DOE  NE  Performance  Indicator  (PI)  data.  PDA  may  also  serve  a much  larger  group 
which  includes  other  government  agencies  and  the  general  public  since  the  work  contains  many  generic 
features  such  that  non-DOE  users  may  easily  create  their  own  databases  to  conduct  state-of-the-art 
analysis  in  a PC  environment. 

Coded  in  micro-PROLOG  (v.  1.4),  PDA  consists  of  a series  of  interactive  window  menus.  The 
opening  menu  allows  a user  either  to  choose  a DOE-NE-based  application  or  a generic  one  to  be  named 
by  the  user.  After  an  application  is  chosen,  another  window  menu  with  five  options  is  displayed:  (a) 
indata  for  data  input,  (b)  lists  for  data  listing,  (c)  disco  for  temporary  exit  to  disk  operating  system 
(DOS)  with  special  features  for  saving  data  on  files,  (d)  analysis  for  executing  DATAPLOT  macros  with 
customized  graphics,  and  (e)  clean  for  housekeeping  chores  including  permanent  exit  to  DOS.  To 
facilitate  data  analysis,  three  special  features  of  the  system  are  included: 

(1)  A temporary  exit  feature  under  option  disco  to  access  any  MS-DOS-based  packages  such  as  LOTUS- 

1-2-3,  dBASE,  ORACLE,  etc.  provided  an  effective  memory  manager  is  in  place. 

(2)  Built-in  DATAPLOT  macros  under  option  analysis  for  a user  to  obtain,  at  a single  stroke,  simple 

plots  such  as  histograms,  pie  charts,  Pareto  charts,  C-charts  (count  charts),  P-charts  (proportion 
charts),  lag  plots,  autocorrelation  plots,  box  plots,  scatter  plots,  etc.,  as  well  as  statistical  tests 
to  identify  data  distributions  such  as  normal,  lognormal,  uniform,  logistic,  exponential,  Cauchy, 
Poisson,  Gamma,  Beta,  Weibull,  extreme  value  types  I and  II,  and  binomial. 

(3)  A direct  access  to  DATAPLOT  under  option  analysis  for  users  to  write  their  own  macros  to  conduct 

a full  range  of  statistical  tests,  analysis,  and  experimental  design. 

The  minimum  requirements  of  the  PC  computing  environment  for  running  PDA  on  floppy  drive  "A"  are: 
80386SX-16CPU,  8/16-MHz,  2MB-RAM,  a40MB-hard  diskdrive  "C",  a math-coprocessor,  a 1.44-MB 
3.5"  or  1.2-MB  5.25"  high  density  floppy  drive,  and  MS-DOS  3.3;  a NIST-developed  software  package 
named  DATAPLOT  (v.  92.2),  a proprietary  Fortran-77  run  time  library  and  memory  manager  named 
OTG/DBOS,  and  a proprietary  Tektronix  terminal  emulator  named  PLOTDEV,  all  installed  on  drive  "C"; 
and  a floppy  diskette  named  92330FONG-1  which  contains  the  source  code  of  the  expert  system  PDA 
and  six  proprietary  micro-PROLOG  system  files  needed  to  execute  PDA.  Pending  written  permission 
from  Logical  Programming  Associates  (LPA),  Ltd.,  the  developer  of  micro-PROLOG,  the  diskette 
92330FONG-1  is  available  on  a loan  basis  only  to  participants  of  tutorials  conducted  for  users  of  the 
expert  system  PDA.  DATAPLOT  for  PC’s  is  not  approved  for  public  release  but  is  available  on  a case- 
by-case  basis  upon  request  (see  Appendix  D,  Section  2). 
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DOE  Facility  Naming  Convention 


According  to  a DOE  Guidance  Document  (Ref.  [2],  p.  Al-4),  35  contractors  and  118  facilities 
under  the  cognizance  of  five  Program  Senior  Officials  (PSO’s)  are  required  to  participate  in  the  DOE 
Performance  Indicator  (PI)  Program.  For  the  Phase  1 design  of  the  expert  system  PDA,  a sample  data 
diskette  (Ref  [15])  containing  PI  data  reported  by  7 contractors  and  23  facilities  of  the  Office  of  Nuclear 
Energy  (NE),  one  of  the  five  PSO’s,  was  furnished  to  NIST  on  Nov.  1,  1991.  The  following  is  a naming 
convention  for  each  of  the  7 contractors  and  23  facilities  as  identified  in  Ref.  [15]  and  PDA  (v.  92.2): 


Database  (Location/Contractor) 


Naming  Convention  & Window  Display 


FI . CH-AN  (Chicago/Argonne)  FI  1 

F12 

F13 

F14 

F15 

F16 

F17 

F2.  CH-BN  (Chicago/Brookhaven)  F21 

F22 

F23 

F3.  IDAHO  (Idaho  & Alburquerque/EG&G)  F31 

F32 

F33 

F34 

F35 

F4.  OAKRI  (Oak  Ridge/Martin  Marietta)  F41 

F42 

F43 

F44 

F45 

F46 

F5.  RL-WH  (RichlandAA/estinghouse-Hanford)  F51 

F52 

F53 

F54 

F55 

F6.  SF-LL  (San  Francisco/Lawr.  Livermore)  F61 

F62 

F7.  SF-RI  (San  Francisco/Rockwell  Int'l)  F71 

F72 


CONT  (Contractor) 

EBR  (Experimental  Breeder  Reactor  - II) 

FMF  (Fuel  Manufacturing  Facility) 

HFEF  (Hot  Fuel  Examination  Facility) 

JANU  (JANUS) 

NRAD  (Neutron  Radiography  Facility) 

TREA  (Transient  Reactor  Test) 

BMRR  (Brookhaven  Medical  Research  Reactor) 
CONT  (Contractor) 

HFBR  (High  Flux  Beam  Reactor) 

AMCF  (Adv  React  Meas  Fac  & Coupled  Fast  RMFI 
ATR  (Advanced  Test  Reactor) 

CONT  (Contractor) 

MD50  (Alpha  Fuels  Fac  - Mound  Plant/Bldg  50) 
TRHC  (Test  Reactor  Hot  Cell  Facility) 

CONT  (Contractor) 

HFIR  (High  Flux  Isotope  Reactor) 

PADU  (Paducah  Gaseous  Diffusion  Plant) 

PORT  (Portsmouth  Gaseous  Diffusion  Plant) 
REDC  (Radiochemical  Engineering  Dev.  Ctr.) 
TSR  (Tower  Shielding  Reactor) 

B308  (Building  308) 

CONT  (Contractor) 

FFTF  (Fast  Flux  Test  Facility) 

FMEF  (Fuels  & Materials  Examination  Facility) 
MASF  (Maintenance  & Storage  Facility) 

AVLI  (AVLIS) 

CONT  (Contractor) 

CONT  (Contractor) 

ETEC  (Energy  Technology  Engineering  Center) 


- viii  - 
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Labelling  of  DOE  Performance  Indicators  (PI) 


Label 

PI  No. 

PI  Title 

Unit  CNumber)  Unit  [Others) 

1100 

1.1 

Collective  Radiation  Dose 

(person-rem) 

1200 

1.2 

Skin  Contaminations 

(No.  of  events) 

1300 

1.3 

Internal  Contaminations 

(No.  of  events) 

1400 

1.4 

Radioactive  or  Hazardous  Material  Overexposures 

(No.  of  events) 

1410  Root  cause  Material 

1420  Root  cause  Procedures 

1430  Root  cause  Personnel 

1440  Root  cause  Management 

1450  Root  cause  Design 

1460  Root  cause  Training 

1470  Root  cause  Other 


(Data  in  Table  2*) 
(Data  in  Table  2*) 
(Data  in  Table  2*) 
(Data  in  Table  2*) 
(Data  in  Table  2*) 
(Data  in  Table  2*) 
(Data  in  Table  2*) 


1520 

1.5.1 

Lost  Work  Day  Cases 

(No.  of  events) 

1530 

1.5.2 

Total  Hours  Worked,  by  facility 

(hour) 

1.5 

Lost  Work  Days  (Lost  Time  Accident  Rate),  calculated 
by  Rate  = ( 200,000  hrs  x Data- 1520  ) / ( Data- 1530  ) 

1620 

1.6.1 

Recordable  Injuries/Illnesses 

(No.  of  events) 

7 Data  Points  in  Table  1* 

2100 

2.1 

Environmental  Incidents 

(No.  of  events) 

2200 

2.2 

Unplanned  Safety  Function  Actuations 

(No.  of  events) 

2300 

2.3 

Violations  of  Operating  Procedures 

(No.  of  events) 

2400 

2.4 

OSHA  Violations 

(No.  of  events) 

2500 

2.5 

Unplanned  Shutdowns 

(No.  of  events) 

2600 

2.6 

Emergency  and  Unusual  Occurrences 

(No.  of  events) 

— 6 Data  Points  in  Table  1*  — 


♦Tables  1 and  2 refer  to  datafiles  cxintained  in  a DOE  diskette  (Ref.  [15])  furnished  to  NIST  on  Nov.  1,  1991. 
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Label 

3110 

3120 

3210 

3220 


4100 

4200 

4300 


4420 

4430 


4520 

4530 

4600 


4711 

4712 

4713 

4721 

4722 

4723 

4731 

4732 

4733 


Labelling  of  DOE  Performance  Indicators  (PI)  - Continued 


PI  No. 

PI  Title 

Unit  ("Number)  Unit  (Others) 

3.1.1 

Radionuclide  Effluent  Releases,  Airborne 

(curie) 

3.1.2 

Radionuclide  Effluent  Releases,  Liquid 

(curie) 

3.2.1 

Hazardous  Substance/Regulated 

Pollutant  Effluent  Releases,  Airborne 

(pound) 

3.2.2 

Hazardous  Substance/Regulated 

Pollutant  Effluent  Releases,  Liquid 

(UOOO-gallon) 

— 4 Data  Points  in  Table  1 (See  Footnote  on  Previous  Page)  — 

4.1 

Open  DOE  Audit  Issues 

(No.  of  issues) 

4.2 

Open  External  Organization  Recommendations 

(No.  of  recommendations) 

4.3 

Occurrence  Reports  with  Open  Corrective  Actions 

(No.  of  reports) 

4.4 

Corrective  Maintenance  Backlog 

4.4.1 

No.  of  Open  Items  > 3 months  old 

(No.  of  items) 

4.4.2 

Total  number  of  open  items 

(No.  of  items) 

4.5 

Preventive  Maintenance  Overdue 

4.5.1 

No.  of  items  not  completed 

(No.  of  items) 

4.5.2 

Total  items  scheduled 

(No.  of  items) 

4.6 

Substance  Abuse  Incidents 

(No.  of  events) 

4.7 

Volume  of  Solid  Low  Level  Radioactive  and/or  Hazardous  Waste  Generated 

4.7.1. 1 

Radioactive  Waste  (RW),  volume  generated 

(cubic  feet) 

4.7.1.2 

RW,  volume  in  final  form,  pending  shipment 

(cubic  feet) 

4.7.1.3 

RW,  volume  shipped  for  disposal 

(cubic  feet) 

4.7.2.1 

Hazardous  Waste  (HW),  volume  generated 

(cubic  feet) 

4.7.2.2 

HW,  volume  in  final  form,  pending  shipment 

(cubic  feet) 

4.7.2.3 

HW,  volume  shipped  for  disposal 

(cubic  feet) 

4.7.3. 1 

Mixed  Waste  (MW),  volume  generated 

(cubic  feet) 

4.7.3.2 

MW,  volume  in  final  form,  pending  shipment 

(cubic  feet) 

4.7.3.3 

MW,  volume  shipped  for  disposal 

(cubic  feet) 

— 17  Data  Points  in  Table  1 (See  Footnote  on  Previous  Page) 
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PDA:  A PC -based  Expert  System  for  Analysis  of 
DOE  Nuclear  Energy  Performance  Indicator  Data 


J.  T.  Fong,  B.  Bernstein,  and  J.  J.  Filliben 


Chapter  1 - Introduction 

In  Jan.  1991,  Admiral  James  D.  Watkins,  USN  (Retired),  Secretary  of  U.  S.  Department 
of  Energy  (DOE),  issued  a directive,  SEN-29-91  [1]‘  to  establish  a uniform  data-reporting 
program,  to  be  known  as  the  Performance  Indicator  (PI)  Program,  for  trending  and  analyzing 
operational  data  of  all  DOE  facilities  except  those  under  the  Naval  Nuclear  Propulsion  Program. 

The  purpose  of  the  PI  Program  is  to  help  assess  and  support  progress  in  improving 
performance  and  in  strengthening  line  management  control  of  operations  relating  to 
environmental,  safety,  and  health  activities.  The  Assistant  Secretary  for  Nuclear  Energy  (NE) 
was  assigned  the  responsibility  to  develop  this  trending  system,  to  conduct  Departmentwide 
training  sessions,  and  to  prepare  guidance  documents  necessary  to  implement  it.  Admiral 
Watkins’  directive  [1]  also  laid  out  a schedule  for  the  implementation  of  the  PI  Program: 

"...  The  trending  system  is  to  be  operational  by  June  1991.  After  that  date,  each 
Operations  Office  Manager  shall  submit  quarterly  reports  to  the  relevant  program 
office.  Program  offices  shall  then  complete  their  analyses  and  submit  summary  trend 
reports  of  the  performance  indicators  to  the  Office  of  the  Secretary  within  3 weeks 
from  receipt  of  the  report  from  the  Operations  Offices. " 

In  Apr.  1991,  the  DOE  Office  of  NE  issued  a guidance  d(x:ument  [2]  in  which  it  stated 

"...  the  intent  of  establishing  this  program  is  to  enhance  the  safety  culture  in  both 
DOE  and  contractor  organizations  by  using  Pis  to  improve  performance.  It  is 
expected  that  active  management  involvement  with  facility  operations  will  include 
using  Pis,  so  that  potential  problems  and/or  deteriorating  conditions  related  to 
environment,  safety,  and  health  activities  can  be  readily  identified  and  promptly 
corrected.  In  addition,  good  practices  should  be  identified  which  can  be  applied  to 
benefit  other  DOE  operational  areas. 


^Figure  in  square  brackets  denotes  a reference  listed  at  the  end  of  this  report. 
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"An  objective  of  this  program  is  to  provide  trends  and  analyses  of  operational  data 
that  will  be  useful  to  both  DOE  and  its  contractors.  As  directed  in  SEN-29-91,  each 
program  office  shall  maintain  direct  responsibility  for  ensuring  the  preparation  and 
accuracy  of  the  PI  data  for  the  activities  under  their  cognizance. 

"It  is  a requirement  that  all  data  reported  in  this  program  be  unclassified. " 

There  are  four  appendices  in  the  guidance  document  [2]:  Appendix  1 lists  the  names  of  the  35 
contractors  and  118  major  facilities  included  in  this  program,  Appendix  2 provides  the 
definitions  of  the  22  performance  indicators  in  four  categories,  and  Appendix  3 describes  the 
report  format  and  content.  In  Appendix  4,  the  guidance  document  [2]  specifies  that 

"...  the  general  methodology  for  trending  and  analyzing  data  gathered  under  the 
DOE  Performance  Indicator  Program  combines  numerical  methods  to  organize  the 
data  with  engineering  management  knowledge  and  insights  concerning  the  process 
operations. 

"DOE  and  DOE  contractor  line  management  are  required  to  assess  and  quantify  the 
information  for  each  PI  using  data  distribution  and  control  charts. 

"The  analysis  itself  is  not  a problem  solving  tool.  It  can  assist  in  determining  the 
cause  of  variations  in  operations,  which  is  essential  in  selecting  appropriate 
managerial  actions  to  effect  improvements. " 

Three  types  of  charts  are  singled  out  as  required  for  reporting:  the  so-called  Pareto  distribution 
chart,  the  C-chart  (i.e.,  count  chart),  and  the  P-chart  (i.e.,  proportion  chart). 

The  problem  of  engineering  plant  performance  or  inservice  data  reporting  and  analysis 
is  not  new.  In  1978,  the  American  Society  of  Mechanical  Engineers  (ASME)  sponsored  a 
symposium  to  address  that  subject  for  a specific  sector  involving  the  use  of  pressure  vessels, 
piping,  pumps,  and  valves  [3,  4].  The  relevance  of  the  inservice  data,  a uniform  reporting 
standard,  and  the  use  of  state-of-the-art  statistical  analysis  techniques  to  the  improvement  of 
engineering  reliability  and  the  making  of  day-to-day  engineering  decisions,  was  addressed  in  a 
series  of  papers  by  Fong  [5-9].  Subsequently,  the  availability  of  increasingly  powerful  personal 
computers  (PCs)  and  PC-based  system  and  analysis  software  packages  motivated  Fong  and  his 
colleagues  at  the  National  Institute  of  Standards  and  Technology  (NIST)  to  pursue  research  and 
prototype  expert  system  development  for  engineering  applications  [10-12],  where  inservice  or 
laboratory  testing  data  are  stored,  reviewed,  analysed  and  interpreted  for  decision  making. 

The  above-mentioned  on-going  research  at  NIST  prompted  the  DOE  Office  of  Nuclear 
Energy,  through  Mr.  Owen  W,  Lowe,  Director  of  the  DOE  Office  of  Nuclear  Safety  Self- 
Assessment,  and  Mr.  I-Ling  Chow  of  DOE  Nuclear  Performance  Evaluation  Division,  to  invite 
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Fong  to  consider  providing  DOE  with  technical  assistance  in  support  of  the  PI  Program. 

On  May  1,  1991,  Fong  visited  the  Germantown  office  of  DOE  and  made  a presentation 
on  the  subject  of  engineering  expert  systems  for  managing  and  analyzing  performance  data.  A 
letter  of  agreement  between  DOE  and  NIST  was  initiated  in  June  1991  and  signed  in  Sep.  1991 
together  with  a procurement  request  (No.  0191NE-20413.(XX)1)  stating  that  NIST  will  conduct 
research  to  develop  a PC-based  expert  system  for  DOE-specific  and  generic  applications  in 
support  of  the  PI  Program.  This  expert  system,  using  an  artificial  intelligence  language  named 
Micro-Prolog  and  a NIST-developed  statistical  data  analysis  named  DATAPLOT,  will: 

(1)  Perform  state-of-the-art  statistical  analyses  on  compiled  PI  data  and  generate  the 
graphics  for  PI  reports  as  required  by  SEN-29-91  [1]. 

(2)  Test  the  validity  of  the  underlying  assumptions  and  determine  the  best-fitted 
distributional  mcxlel  of  the  data  reported  as  one  of  the  following:  normal, 
lognormal,  uniform,  logistic,  exponential,  Cauchy,  Extreme  Value  Types  I and 
II,  Gamma,  Beta,  Weibull,  Binomial,  Geometric,  and  Poisson. 

Under  this  agreement,  two  members  of  the  NIST  staff  (Fong  and  Filliben)  and  a NIST  contractor 
(Bernstein)  will  carry  out  the  necessary  research  to  accomplish  the  above  objectives  with  a 
partial  reimbursement  of  the  total  cost  by  DOE.  The  duration  of  this  work,  jointly  sponsored 
by  DOE  and  NIST,  was  initially  set  at  five  months  (Oct.  1,  1991  to  Feb.  28,  1992)  and 
subsequently  extended  to  Apr.  15,  1992  at  no  additional  cost  to  DOE  to  account  for  the  inclusion 
of  tutorial  exercises  based  on  DOE-generated  data. 

In  Chapter  2,  we  present  a brief  overview  of  the  use  of  expert  systems  in  engineering 
data  analysis  and  the  rationale  for  selecting  Micro-Prolog  (version  1.4,  standard  syntax)  as  the 
programming  language  and  DATAPLOT  (PC  version  92.2)  as  the  statistical  analysis  package 
for  both  generic  and  DOE-specific  applications.  Based  on  two  DOE  reports  [13,  14],  a datafile 
diskette  [15]  and  a hardcopy  listing  of  selected  data  [16],  all  furnished  by  Mr.  I-Ling  Chow  of 
DOE,  we  present  in  Chapter  3 the  design  specification  of  a PC-based  expert  system  named 
PDA,  which  stands  for  Performance  Indicator  Data  Analysis  System. 

Chapters  4 to  6 are  tutorials,  with  which  a user  may  learn  how  to  create  a database  and 
perform  a statistical  analysis  on  data  to  be  entered  either  via  the  keyboard  or  a DOS  file.  The 
significance  and  limitations  of  the  expert  system,  PDA,  version  92.2,  are  discussed  in  Chapters 
7 & 8.  A list  of  41  references,  four  appendices,  i.e.,  (A)  listing  of  a system  diskette  named 
92330FONG-1  containing  103  files  and  one  subdirectory,  (B)  listing  of  the  source  code  for  the 
expert  system  under  the  filename  of  PDA. LOG,  (C)  listing  of  869  DATAPLOT  commands  or 
reserved  words,  (D)  listing  of  the  service  contacts  for  software  packages  Prolog  and 
DATAPLOT,  and  an  index  of  85  DATAPLOT  commands  selected  for  first-time  users  and 
invoked  in  20  macros  for  tutorial  purposes,  are  included  at  the  end  of  this  report. 
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Chapter  2 - An  Expert  System  Approach  to  Data  Analysis 

In  response  to  the  DOE  request  for  a short-term  technical  assistance  in  support  of  a 
safety-related  multi-facility  performance  data  analysis  and  trending  program,  we  observe  that  the 
time  frame  of  5-6  months  necessitated  a practical  solution  through  the  re-use  of  as  much  as 
possible  the  basic  research  results  and  computer  codes  we  developed  at  NIST  on  the  generic 
subject  of  PC-based  expert  systems  for  engineering  data  analysis  [11,  12]. 

However,  before  we  embark  on  a software  re-use  project  in  support  of  the  DOE 
Performance  Indicator  (PI)  Program,  we  like  to  answer  the  following  three  basic  questions: 

Question  1 Why  do  we  select  DATAPLOT  (v.  92.2)  as  the  data  analysis  package? 

Question  2 Why  do  we  adopt  an  expert  system  approach  to  data  analysis? 

Question  3 Why  do  we  select  Micro-Prolog  (v.  1.4)  for  coding  the  expert  system? 

To  answer  Question  1,  we  recall  that  during  the  early  1960’s,  mainframe  computers  were 
widely  available  to  engineers  and  scientists  for  computational  modeling  and  data  analysis. 
Among  the  first  to  devise  a user-friendly  approach  to  data  analysis  was  a research  group  at 
NIST,  then  the  National  Bureau  of  Standards  (NBS).  Headed  by  Hilsenrath  [17],  the  group 
designed  a programming  language  named  QMNITAB  using  a worksheet  concept  and  very  simple 
English-like  instructions  to  perform  scientific  calculations  on  data  in  columns  of  the  worksheet. 
The  language  has  since  gone  through  several  version  enhancements  with  the  latest  implemented 
on  a variety  of  platforms  from  mainframes  [18]  to  personal  computers^. 

Inspired  by  QMNITAB,  the  computer-assisted  approach  to  data  analysis  mushroomed  in 
the  1970s.  By  1979,  when  the  American  Statistical  Association  (ASA)  Committee  on  Statistical 
Program  Packages  initiated  a survey  [19],  the  developers  of  117  packages  responded  with  short 
summaries  of  their  basic  features  and  self-ratings.  During  the  same  period,  a new  approach  to 
data  analysis  appeared  on  the  scene.  Pioneered  by  Tukey  [20],  the  approach  divided  our 
analysis  obligation  to  a given  set  of  data  into  three  stages: 

Stage  1 Exploratory  Data  Analysis  "We  need  to  explore  the  data  flexibly  - here 

flexibility  can  be  enhanced  by  simplicity  without  exhaustiveness. " - Tukey  [20]. 


^The  PC  version  of  OMNITAB  and  an  addendum  to  the  1986  manual  [18]  are  expected  to  be  released  in  May  1992. 
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Stage  2 Exhaustive  Data  Analysis  "We  need  to  cany  out  the  chosen  analyses 
carefully  and  exhaustively  - especially  if  we  are  to  use  them  in  a controversy. " 

- Tukey  [20]. 

Stage  3 Confirmatory  Data  Analysis  This  is  the  stage  where  most  of  the  packages 
surveyed  by  ASA  [19]  were  designed.  Simply  stated,  the  goals  of  the  confirmatory 
data  analysis  are  (a)  to  look  at  a sample  and  at  what  that  sample  has  told  us  about 
the  population  from  which  it  came,  and  (b)  to  assess  the  precision  with  which  our 
inference  from  sample  to  population  is  made.  "We  can  no  longer  get  along  without 
confirmatory  data  analysis.  But  we  need  not  stan  with  it, " - Tukey  [20]. 

Recognizing  the  need  of  a companion  tool  to  implement  Stages  1 & 2,  which  were  new,  and 
Stage  3,  which  was  addressed  by  OMNITAB  with  discrete  graphics,  another  group  of 
researchers  at  NIST  began  developing  a new  package  named  DATAPLOT.  Headed  by  Filliben 
[21,  22],  a co-author  of  this  report,  the  group  intrcxiuced  numerous  new  features  such  as: 


Feature  fll  - Continuous  and  Report-Quality  Graphics. 

Feature  (2)  - Exploratory  Data  Analysis  (after  Tukey  [20]). 

Feature  (3)  - Non-Linear  Fitting. 

Feature  (41  - Experimental  Design  (after  Box  et  al  [23]). 

Feature  (51  - Statistical  Process  Control  (after  Ishikawa  [24]). 

Feature  (61  - Special  analysis  codes  such  as  BLOCK  PLOT,  BOX-COX 

NORMALITY  PLOT,  and  a sophisticated  test  of  normality  plot  named  PPCC  [25]. 


Undoubtedly,  one  may  find  a large  number  of  commercially-available  packages,  e.g.,  MLAB 
[26],  SYSTAT  [27],  etc.,  having  many  if  not  aU  of  the  above  features,  but  we  select 
DATAPLOT  as  the  primary  data  analysis  package  because  of  two  additional  features,  namely, 
(7)  portability,  and  (8)  public-domain.  Feature  (7),  as  documented  in  Appendix  D,  implies  that 
DATAPLOT  codes  written  for  one  computer  can  run  virtually  unchanged  in  many  other 
platforms  ranging  from  UNIX-based  supercomputers  to  386-based  personal  computers.  This  is 
useful  to  DOE  when  data  are  gathered  over  118  facilities  each  with  its  own  database  platforms. 
Feature  (8)  is  relevant  when  the  cost  of  installing  a proprietary  package  on  many  computers  at 
each  of  the  118  DOE  facilities  is  a critical  factor  for  Departmentwide  acceptance. 


^ "All  publication  is  potentially  part  of  a controversy,  just  as  all  use  as  evidence  is  potentially  part  of  an  adversary 
position, " Tukey  [20,  Preface]. 


5 


Fong,  Bernstein  & FiUiben  (1992)  on  "PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data’ 


Having  answered  Question  1 on  the  selection  of  D ATAPLOT,  we  observe  that  the  3-stage 
approach  to  data  analysis  [20]  implies  that  both  a subject-domain  specialist  and  a statistician  need 
to  be  available  to  assist  a user  to  interpret  first  the  results  of  the  exploratory  analysis  (Stage  1) 
before  undertaking  the  exhaustive  analysis  (Stage  2),  and  then  the  results  of  the  Stage  2 analysis 
before  going  for  a final  confirmatory  analysis  (Stage  3).  With  D ATAPLOT,  this  translates  into 
a requirement  for  an  on-line  help  module  where  some  "resident  help  opinions"  are  dispensed  at 
various  junctions  along  the  journey  of  a multi-stage  analysis  path. 

Clearly,  the  diversity  of  the  data  analysis  problem  makes  the  implementation  of  a general 
help  module  extremely  difficult  if  not  impossible.  Nevertheless,  Filliben  and  Fong  [28]  were 
able  to  demonstrate  in  1984  that  for  a limited  class  of  domain-specific  problems,  this  so-called 
expert  system  approach  was  feasible.  Furthermore,  when  a prototype  system  [29]  was  developed 
and  tested  among  a broad  spectrum  of  users,  the  response  was  favorable  especially  among  users 
who  were  domain  experts  but  not  statisticians. 

The  timing  of  our  expert  system  approach  to  data  analysis  coincided  with  that  of  two  new 
developments  in  expert  system  computing,  namely,  the  availability  of  commerical  expert  system 
building  tools  [30-33],  and  that  of  the  expert  system  programming  languages  such  as  Prolog  [34- 
40].  In  1987,  when  we  began  our  research  on  the  first  prototype  expert  system  for  an  engi- 
neering application  [11],  we  chose  Micro-Prolog  (v.  1.4,  standard  Lisp-like  syntax)  as  the 
programming  language  instead  of  one  of  those  building  tools,  commonly  known  as  expert  system 
shells,  primarily  for  the  following  three  reasons: 

Performance.  Compared  to  a basic  language  such  as  Prolog  [35],  an  expert  system 
shell  is  a higher-level  language  designed  for  a domain  specialist  to  develop  an 
application  by  specifying  rules  for  data  analysis  and  interpretation.  Generally 
speaking,  a shell-based  expert  system  performs  less  efficiently  than  a Prolog-based 
system  because  the  latter  can  be  custom-made  and  optimized  for  a single  application. 

Maintenance.  For  government  applications  such  as  the  DOE  Nuclear  Energy 
Performance  Indicator  Program,  the  requirements  for  an  expert  system  application 
are  seldom  fixed  at  the  beginning  of  its  development.  Experience  shows  that  as  soon 
as  the  users  gain  some  insight  into  the  first  version  of  an  expert  system,  they  may 
wish  to  change  some  old  or  add  some  new  requirements.  This  leads  to  a software 
maintenance  problem,  which,  in  general,  is  easier  to  handle  by  a user  if  the  expert 
system  is  coded  in  Prolog  rather  than  a shell  language. 

Re-Usabilitv.  An  expert  system  coded  in  Prolog  can  easily  serve  as  the  take-off 
point  for  a similar  or  more  complicated  system.  By  re-using  a code  for  a variety  of 
applications  thus  enhancing  software  productivity,  Prolog  has  an  advantage  that  no 
shell  language  can  claim. 
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Chapter  3 - Design  of  Expert  System  PDA  (v.  92.2) 


The  re-usability  feature  of  a Prolog  code  assumes  that  the  language  does  not  undergo  a 
major  version  change.  In  our  two  previous  applications  [11,  12],  we  developed  codes  using  the 
standard  Lisp-like  syntax  of  the  LPA  PROLOG  Professional  (version  1.4),  which  was  marketed 
in  the  United  States  under  the  trade  name  of  micro-PROLOG.  As  documented  in  Appendix  D, 
Section  1,  the  standard  syntax  is  ideal  for  writing  programs  for  data  analysis  because  it  treats 
data  and  analysis  subroutines  alike  as  a single  data  type  — the  list.  Two  alternatives,  i.e.,  the 
Edinburgh  and  the  Simple  syntax,  are  also  available  on  version  1.4,  but  are  more  restrictive, 
because  terms  and  lists  are  of  different  types,  and  goals,  argument  lists  and  bodies  cannot  be 
represented  in  source  code  by  Prolog  variables  [38].  Furthermore,  the  standard  syntax  is  the 
only  syntax  directly  understood  by  micro-PROLOG,  and  programs  written  in  any  other  syntax 
are  compiled  sentence  by  sentence  into  the  standard  syntax  as  they  are  entered  [37,  p.249]. 

Having  selected  the  standard  syntax  to  code  our  two  previous  Prolog  applications  and 
agreed  to  develop  a new  system  for  DOE  in  a short  time  frame  by  re-using  the  old  codes  [11, 
12],  we  discovered  in  June  1991  that  the  new  3.0  version  of  micro-PROLOG  [39,  40],  since 
renamed  DOS  Prolog,  supports  only  the  Edinburgh  but  not  the  standard  syntax"*.  To  make  the 
matter  worse,  some  of  the  primitives  available  in  the  old  version  and  used  in  our  previous 
applications  were  dropped  in  the  new  version,  so  the  tasks  of  (a)  converting  our  old  codes  to  a 
new  set  of  instructions  capable  to  running  in  the  3.0  version  environment,  and  (b)  modifying  the 
new  code  to  meet  the  DOE  application  requirements,  are  far  more  time-consuming  than 
originally  perceived  and  agreed  upon  between  DOE  and  NIST. 

After  some  careful  considerations,  we  conclude  that  at  least  during  the  first  phase  of  this 
consulting  assignment,  the  primary  goal  is  to  acquaint  DOE  staff  with  the  exploratory  data 
analysis  capability  of  DATAPLOT.  To  accomplish  this,  we  need  a two-prong  effort  where  we 
first  develop  an  expert  system  named  PDA  (for  Performance  Indicator  Data  Analysis)  by  re- 
using and  modifying  the  old  Prolog  code  (version  1.4)  and  then  concentrate  on  preparing  a good 
documentation  including  easy-to-understand  tutorials  where  some  of  the  most  useful  DATAPLOT 
commands  are  taught  by  examples  rather  than  by  description.  During  the  next  phase,  comments 
by  DOE  staff  will  be  considered  to  improve  the  first  version  of  the  expert  system  and  an  attempt 
will  be  made  to  convert  the  1.4-version  code  to  a new  one  capable  of  running  in  the  Prolog  3.0- 
version  environment  using  only  the  Edinburgh  syntax.  During  the  final  phase,  an  interactive 
help  module  with  "resident  expert  opinions"  will  be  developed  to  help  a user  undergoing  the  3- 
stage  data  analysis  effort.  The  following  is  a recommended  time-table  for  the  completion  of  the 
expert  system  research  and  development  project: 
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See  page  vi  for  a "Note  on  Prolog  Copyrighted  Materials  & Version  Conversion. 
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Phase 

Primarv  Goal 

Duration  of  Work  (Future  Est.  J 

1 

(This 

report) 

Design  of  PDA  (v.  92.2) 
with  Example-Driven 

Tutorials  on  DATAPLOT. 

Oct.  1991  - Mar.  1992  (6  months). 

Total  labor  (3  investigators)  ^16  pers.-wks. 
7.0  pers.-wks  reimbursed  by  DOE;  rest  by  NIST. 

2 

(Future) 

Prolog  Version  Conversion 
(v.  1.4  to  3.0)  and  Addition 
of  Modules  to  PDA  (v.  93.x). 

(6-9  moruhs). 

3 

(Future) 

Upgrading  of  PDA  (v.  94.x) 
to  include  Help  Module  for 
Exploratory  Data  Analysis. 

(9-12  months). 

What  follows  is  a description  of  the  Phase  1 design  specifications  and  the  implementation  of  the 
design  using  micro-PROLOG  (v.  1.4)  as  the  programming  language  and  DATAPLOT  (v.  92.2) 
as  the  primary  data  analysis  software  package. 

Before  we  begin  the  Phase  1 design  of  PDA  as  a software  re-use  project,  we  need  to  list 
the  key  features  of  two  previous  projects  named  NDD  [11]  and  CFD  [12],  and  compare  the 
listing  with  those  of  PDA  in  order  to  assess  how  much  of  the  old  codes  can  be  retained  and  what 
types  of  new  codes  need  to  be  added.  The  following  table  summarizes  the  comparison  on  a 
feature-by-feature  basis: 


Feature 

NDD  nil 

CFD  1121 

PDA 

Tutorial 

DATAPLOT  in  drive  "C". 

— 

— 

Yes  (New). 

4.1. 

Expert  System  in  drive  "A". 

Yes. 

Yes. 

Yes. 

4.2. 

Generic  Applications. 

— 

Yes. 

Yes. 

4.3  & 4.5 

DOE-Specific  Applications . 

— 

— 

Yes  (New). 

5.1. 

Menu  with  Exit  to  DOS  Option. 

Yes. 

Yes. 

Yes. 

5.3. 

Menu  with  Datafile  Partition  Option. 

— 

— 

Yes  (New). 

5.4. 

Data  Input  (Indata)  by  Keyboard. 

Yes. 

Yes. 

Yes. 

5.5. 

Old  Data  Review  or  Revise  Option. 

Yes. 

Yes. 

Yes. 

5.6  & 5.7 
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Feature  (Continued) 

NDD  fill 

CFD  f121 

PDA 

Tutorial 

9.  Selective  Deletion  of  Old  Data. 

— 

— 

Yes  (New). 

5.8. 

10.  Data  Input  (Indata)  by  File. 

— 

Yes. 

Yes. 

5.9. 

11.  Listing  of  Old  Data  (Lists). 

Yes. 

Yes. 

Yes. 

5.10. 

12.  Save  Input  Data  in  a DOS  File. 

Yes. 

Yes. 

Yes. 

5.11. 

13.  Save  Input  Data  as  a DATAPLOT  File. 

— 

— 

Yes  (New). 

5.12. 

14.  Selective  Retrieval  of  Input  Data 
and  Save  as  a DATAPLOT  File. 

— 

— 

Yes  (New). 

5.13. 

15.  Menu  with  Analysis  Option. 

— 

Yes. 

Yes. 

5.14. 

16.  Analysis  with  DATAPLOT  Option. 

— 

— 

Yes  (New). 

6.1  -6.14. 

17.  Exit  with  Restart  Option. 

— 

Yes. 

Yes. 

4.4. 

18.  Exit  with  System  Code  Save  Option. 

Yes. 

Yes. 

Yes. 

5.2. 

19.  micro-PROLOG  (v.  1.4)  code  in 
standard  Lisp-like  syntax. 

Yes. 

Yes. 

Yes^. 

— 

20.  micro-PROLOG  (v.  1.4)  code  in 
modular  structure. 

No. 

No. 

No^ 

Of  the  seven  new  features,  two  (4  and  6)  are  required  for  DOE  applications,  and  four  (1,  13,  14,  and 
16)  are  DATAPLOT-related.  Of  the  DATAPLOT-related  features,  one  (16)  demands  most  of  our  time 
and  effort  since  it  is  the  ease  of  applying  DATAPLOT  to  the  DOE  PI  Program  that  lies  at  the  heart  of 
this  project.  Consequently,  we  worked  very  closely  with  the  DOE  staff  to  come  up  with  a design 
requiring  a total  of  40  DATAPLOT  macros,  of  which  20  are  implemented  for  Phase  1 as  shown  below: 


Analysis  Ootion 

Data  File 

Phase  1 

Phase  2 

Tutorial 

1.  Histogram. 

DOE  1C0L.DAT 

Yes. 

Yes. 

6.1. 

2.  Pie  Chart. 

DOE  2CLB.DAT 

Yes. 

Yes. 

6.2. 

3.  Pareto  Chart. 

DOE  2CLB.DAT 

Yes. 

Yes. 

6.3. 

^Conversion  from  standard  syntax  (v.  1.4)  to  Edinburgh  syntax  (v.  3.0)  and  from  flat  to  modular  structure  are 
planned  for  Phase  2 design  of  PDA.  See  pp.  7-8  for  more  details. 


9 


Fong,  Bernstein  & Filliben  (1992)  on  "PDA:  A PC-based  Expert  System  for  Analysis  of  EKDE  Nuclear  Energy  Performance  Indicator  Dau’ 


Analysis  Ootion 

Data  File 

Phase  1 

Phase  2 

Tutorial 

4. 

PI  Data  for  4 quarters 

and  7 groups. 

DOE  3COL.DAT 

Yes. 

Yes. 

6.4. 

5. 

2D  Plot  and  Linear  Fit. 

ASTM  2CL.DAT 

Yes. 

Yes. 

6.5. 

6. 

Count  Chart  or  C-Chart. 

DOE  2CLA.DAT 

Yes. 

Yes. 

6.6. 

7. 

P-Chart. 

DOE  3COL.DAT 

Yes. 

Yes. 

6.7. 

8. 

Lag  Plot. 

DOE  1C0L.DAT 

Yes. 

Yes. 

6.8. 

9. 

AutO(X)rrelation  Plot. 

DOE  1C0L.DAT 

Yes. 

Yes. 

6.9. 

10. 

P-Chart  with  Model  ing-1. 

DOE  3COL.DAT 

Yes. 

Yes. 

6.10. 

11. 

P-Chart  with  Modeling-2. 

DOE_3COL.DAT 

Yes. 

Yes. 

6.11. 

12. 

Tests/Box  Plot. 

No^ 

Yes. 

13. 

Tests/Scatter  Plot. 

No^ 

Yes. 

— 

14. 

Tests/Suniniary-4-Plot. 

ASTM  ICL.DAT 

Yes. 

Yes. 

6.12. 

15. 

Tests/Sum’ry  Tabulation. 

ASTM  ICL.DAT 

Yes. 

Yes. 

6.12. 

16. 

Tests/Lambda  Test. 

ASTM  ICL.DAT 

Yes. 

Yes. 

6.12. 

17. 

TestsAVeibulI  Test. 

ASTM  ICL.DAT 

Yes. 

Yes. 

6.12. 

18. 

Tests/Extrm.  Value  Test. 

ASTM  ICL.DAT 

Yes. 

Yes. 

6.12. 

19. 

Tests/Box-Cox  Transf. 

ASTM  ICL.DAT 

Yes. 

Yes. 

6.12. 

20. 

Tests/t-test. 

No^ 

Yes. 

— 

21. 

Tests/ANOVA. 

ASTM  3CL.DAT 

Yes. 

Yes. 

6.13. 

22. 

Tests/Chi-Squared  Test. 

No®. 

Yes. 

— 

23. 

Tests/F-test. 

No®. 

Yes. 

— 

24. 

Distribut. /Normal 

ASTM  ICL.DAT 

Yes. 

Yes. 

6.14. 

25. 

Distribut . /Uniform 

No®. 

Yes. 

— 

26. 

Distribut. /Logistic 

No®. 

Yes. 

— 

27. 

Distribut. /Cauchy 

No®. 

Yes. 

— 

28. 

Distribut.  /Lognormal 

No®. 

Yes. 

— 

29. 

Distribut. /Exponential 

No®. 

Yes. 

— 

30. 

Distribut. /Extrm  Value  Type  1 

No®. 

Yes. 

— 

31. 

Distribut. /Tukey  Lambda 

No®. 

Yes. 

— 

32. 

Distribut. /Students  t 

No®. 

Yes. 

— 

33. 

Distribut./Chi  Squared 

No®. 

Yes. 

— 

34. 

Distribut. /Gamma 

No®. 

Yes. 

— 

35. 

Distribut./Beta 

No®. 

Yes. 

— 

36. 

Distribut. /Weibull 

ASTM  ICL.DAT 

Yes. 

Yes. 

6.14. 

37. 

Distribut. /Extrm  Value  Type  2 

No®. 

Yes. 

— 

38. 

Distribut. /Binomial 

No®. 

Yes. 

— 

39. 

Distribut./Geometric 

No®. 

Yes. 

— 

40. 

Distribut./Poisson 

No®. 

Yes. 

— 

*For  Phase  1 design,  the  DATAPLOT  macro  for  this  analysis  option  is  left  to  the  reader  as  an  exercise. 


10 


Fong.  Bernstein  & FUIiben  (1992)  on  "PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data’ 


Chapter  4 - Tutorial  Notes  on  Generic  Applications 


In  this  chapter,  we  begin  a series  of  tutorials  aimed  at  helping  a PC  user  in  becoming 
proficient  in  executing  the  expert  system  PDA  (v.  92.2)  as  a front  end  to  a data  analysis  package 
named  DATAPLOT  (v.  92.2).  We  shall  begin  with  a list  of  minimum  requirements: 


Hardware  H-1.  80386SX-16  CPU-based  Personal  Computer  (PC). 

H-2.  2MB-RAM. 

H-3.  40MB-Hard  Disk. 


H-4.  Mathematical  Coprcxessor. 

H-5.  1.44-MB  3.5"  or  1.2-MB  5.25"  high  density  floppy  drive. 

H-6.  VGA  or  EGA  monitor. 


Software 


S-1.  MS-DOS  3.3  or  up;  or  DR-DOS  5.0  or  up. 

S-2.  A proprietary  package  named  OTG/DBOS^,  which  is  a 
FORTRAN-77  run  time  library/ virtual  memory  manager  for 
386/486  PC’s.  [Est.  Cost:  $105.00]. 

S-3.  A proprietary  Tektronix  emulator  named  PLOTDEV* *,  which 
translates  DATAPLOT  Tektronix  4014  output  to  VGA  or  EGA. 

[Est.  Cost:  $50. (X)]. 

S-4.  A public-domain  package  named  DATAPLOT  (v.  92.2  or  up), 
available  from  NIST  as  described  in  Section  2 of  Appendix  D. 

S-5.  A public-domain  package  named  PD  A.  LOG  (v.  3-12-92),  six 
proprietary  Prolog  system  files  named  APP.MOD,  FIGURE. SYS, 
LINKER.SYS,  LOADER.SYS,  PROLOG.EXE,  PROLOG. SYS^ 
and  92  additional  files  contained  in  a floppy  diskette  named 
92330FONG-1,  available  from  NIST  as  described  in  Appendix  A. 


Requirements  S-1  through  S-4  must  be  properly  installed  in  the  hard  disk  drive  "C"  before 
proceeding  to  the  first  tutorial  of  this  chapter.  Section  4.1. 


^OTG  Systems  Inc.,  P.  O.  Box  239,  Suite  300,  Rts.  106  & 31A,  Clifford,  PA  18413-0239  Tel.  717-222-9100. 

*Microplot  System  Co.,  1897  Red  Fern  Drive,  Columbus,  OH  43229  Tel.  614-882-4786. 

^See  page  vi  for  "Note  on  Prolog  (Copyrighted  Materials  & Version  (Conversion. " 
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Section  4.1  - Preliminary  Tasks  on  Hard  Disk  Drive  "C" 


At  this  point,  you  must  have  successfully  installed  in  the  hard  disk  drive  "C"  not  only 
the  operating  system  (MS-DOS  or  DR-DOS),  but  also  OTG/DBOS,  PLOTDEV,  and 
DATAPLOT.  A listing  of  your  drive  "C"  must  show  a file  named  DBOSSWAP  and  three 
subdirectories  named  DATAPLOT,  OTG  (with  36  files)  and  PLOTDEV  (with  7 files). 


Before  one  can  run  the  DATAPLOT  code,  one  must  first  activate  the  memory  manager 
DBOS  by  rebooting  using  a specific  set  of  batch  files  named  AUTOEXEC. DP  and  CONFIG. DP 
in  place  of  the  AUTOEXEC.BAT  and  CONFIG.SYS  currently  resident  in  drive  "C".  If  those 
two  files  with  extension  .DP  are  not  installed  in  your  subdirectory  C:\DATAPLOT,  you  should 
install  them  now  together  with  two  batch  files  named  DPBOOT.BAT  and  RSBOOT.BAT  as 
listed  below: 


AUTOEXEC  .DP 


CONnC-DP 


DPBOOT.BAT 


RSBOOT.BAT 


©ECHO  OFF 
CLS 

PATH=C:\;C:\DOS;C:\DATAPLOT;C;\OTG 
PROMPT  $P$G 
MODE  LPT1:„P 

SET  D ATAPLOS = C : \D ATAPLOT\ 

SETSYS  CACHEOFF 
DBOSA^DISK 
COMSPACE  D’lOOOOO’ 

CD  D:VDATAPLOT 

HUES =50 
BUFFERS=50 

DEVICE=C:\PLOTDEV\PLOTDEV.SYS 
SHELL=COMMAND.COM  /E:288  /P 


©ECHO 
COPY  C 
COPY  C 
COPY  C 
COPY  C 
©ECHO 
©ECHO 
©ECHO 
©ECHO 
©ECHO 


C:\AUTOEXEC  .JJF 
C:\CONHG.JJF 
C:\AUTOEXEC.BAT 
C:\C0NF1G.SYS 


OFF 

:\AUTOEXEC.BAT 
\CONHG.SYS 

:\D  ATAPLOTNAUTOEXEC . DP 
;\DATAPLOT\CONnG.DP 
*»*««»«******«*«**««******««*«****»*«**:**« 

* PLEASE  MANUALLY  REBOOT  SYSTEM.  * 

* UPON  REBOOTING.  ENTER  DP  * 

* TO  EXECUTE  DATAPLOT.  * 

*««*«*«««***«*«***«***««**#**«**********«« 


©ECHO  OFF 

COPY  C:\AUTOEXEC.JJF  C:\AUTOEXEC.BAT 

COPY  C:\CONHG.JJF  C:\C0NF1G.SYS 

ICILL_DBOS 

©ECHO  **********««****«******=******************* 

©ECHO  • PLEASE  MANUALLY  REBOOT  SYSTEM.  * 

©ECHO  ***3*****«****************«***«************ 
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PC  Hard  Disk  Drive  "C"  - Activating  "DATAPLOT" 


C:\>  cd  DATAPLOI 

C:nDATAPLOT>  DPBOOT 

1 FiLe(s)  copied 
1 Filc(s)  copied 
1 File(s)  copied 
1 File(s)  copied 

WWW  WWW  — mm 

* PLEASE  nAHUALLY  REBOOT  STSTEH.  • 
» UPON  REBOOTING,  ENTER  DP  » 
» TO  EXECUTE  DATAPLOT.  « 

C:\DATAPLOT> 
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PC  Hard  Disk  Drive  "C"  - De-activating  "DATAPLOT" 


C:\DATAPLOT>  rsboot 

1 File(s)  copied 
1 File(s)  copied 
DBOS  reioued  froM  neHory 

» PLEASE  nANUALLV  REBOOT  STSTEH.  « 

wwww»*www*#wwWw%#w^^www.^ww>tf*#wwa*^ 

C:\DAIAPLOI> 
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PC  Hard  Disk  Drive  "C"  - Subdirectory  "DATAPLOT" 


C:\DATAPLOT>  chkdsk/f 

Uoluie  created  11  Oct  1991  4:41 

42,539,008  bytes  total  disk  space 
59,392  bytes  in  3 hidden  files 
243,712  bytes  in  102  directories 
40,890,368  bytes  in  1761  user  files 
1,345,536  bytes  a ua liable  on  disk 

655,360  bytes  total  ienory 
460,736  bytes  auailable 


C:\DAIAPL0T>  dir  dataplot.exe 

Oolume  in  driue  C is 
Directory  of  C:\DATAPL0T 

DATAPLOT  EXE  11843488  2-26-92  7:eip 

1 File(s)  1345536  bytes  free 
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Section  4.2  - Activating  PDA  at  Floppy  Drive  "A" 


In  the  last  tutorial,  we  assumed  that  DATAPLOT  has  been  properly  installed  in  drive  "C" 
and  we  must  first  activate  the  memory  manager  DBOS  before  we  could  run  DATAPLOT, 

In  this  section,  we  assume  that  DBOS  has  been  activated  as  shown  on  page  13  and  we  are  ready 
to  activate  the  expert  system  PDA  by  inserting  the  floppy  92330FONG-1  into  drive  "A". 

Before  activating  PDA,  we  have  two  more  system  chores  to  do.  The  first  is  to  check  the 
compatibility  of  the  COMMAND.COM  file  in  both  the  floppy  92330FONG-1  and  the  hard  disk. 
This  is  done  on  page  17  by  simply  copying  the  COMMAND.COM  file  in  drive  "C"  onto  the 
floppy  92330FONG-1  as  inserted  in  drive  "A".  The  second  is  to  load  the  datafiles  from  the 
floppy  92330FONG-1  into  the  harddisk  under  the  subdirectory  c;\DATAPLOT.  This  is 
accomplished  by  again  using  the  COPY  command  as  shown  below: 


Step 

1 

2 

3 

4 

5 


Action  Item 

Screen  Displav 

Activate  DATAPLOT  and  insert  diskette 

92330FONG-1  into  floppy  drive  "a".  c:\DATAPLOT> 

T ype  copy  a:  \dpdata  1 *.  * 

c:\DATAPLOT  > 

Type  a:  to  change  disk  drive. 

c:\DATAPLOT> 

Type  pda  to  activate  PDA. 

a:\>  pda 

Wait  for  display  of  PDA  menu. 

(See  p.  18.) 

copy  a:\dpdata\*.* 
a: 


Once  you  are  inside  the  expert  system  PDA,  you  may  make  a mistake  in  typing  a command  and 
run  into  a situation  where  you  would  like  to  return  to  a "ground"  state  without  a permanent  exit 
to  DOS.  In  this  regard,  we  have  provided  a convenient  way  for  you  to  do  this  if  you  simply 
type  two  words  separated  by  a blank  character  as  follows: 


6 Type  be  nice  to  return  to  a "ground"  state  without  exit. 

Finally,  if  step  6 does  not  work  or  if  you  see  an  error  message,  the  only  alternative  is  to  reboot 
by  invoking  simultaneously  the  keys  of  Control,  Alternate,  and  Delete.  A list  of  some  of  the 
most  common  numbered  error  messages  generated  by  Micro-Prolog  is  given  on  page  19.  For 
a complete  list  of  error  messages  in  Micro-Prolog,  the  reader  is  advised  to  consult  pp.  C-1 
through  C-9  of  the  reference  manual  by  McCabe,  et  al  [38]. 
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PC  Floppy  Drive  "A”  - Copying  Command,  Com  from  Drive  "C" 


C:S>  dir  coirniand.corn 

Uolurne  in  driue  C is 
Directory  of  C:\ 

COHMAND  com  3Z496  8-H-90  5:00a 

1 rile(s)  13066Z4  bytes  free 


C:S>  copy  connand . con  a: 
1 File(s)  copied 


C:\>  dir  a:connaind.con 

UoLune  in  driue  A is  SZZZ6-F0MG5 
Directory  of  A:N 

COMMAND  COM  3Z196  8-H-90  5:00a 

1 File(s)  597504  bytes  free 
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PC  Floppy  Drive  "A"  - Activating  Expert  System  PDA 


C:\DAIAPLOT>  a: 
A:S>  pda 


LPA  PROLOG  Professional  Interpreter  1.4  - 0Z  Feb  1987 
Copyright  (c)  1987  - Logic  Progranning  Associates  Ltd 
64446  Eul,  8190  Nun.  63488  Txt.  Z568e0  Prg  Bytes  Free 

<1 


- BOE  NE  Perfornance  Indicator  Data  Analysis  Systen 
[—  PDA  (HIST/DOE  Expert  Systei.  u.  9Z.Z) 


(idd  flsu  Hppli:ati:jii 


Delete  Old  Application 

DEHO  (C-Chart/  P-Chart/  Distribution  Chart/) 

1.  CH-AN  (Chicago/Argonne) 

Z.  CH-DN  (Chicago/Brookhauen) 

3.  IIAHO  (Idaho  d Albuquerque/EGdG) 

4.  OAKRI  (Oak  Ridge/Nartin  Narietta) 


5.  RL-UH  (Richland/Uestlnghouse-Hanford) 

6.  SF-LL  (San  Francisco/Laurence  Livernore) 

7.  SF-RI  (Sai  Francisco/Rockuell  International) 
0.  TOTAL  (Group  of  Facilities  with  PI  Data) 


■instruct  ions 

»»  Use  Space-Bar  to  Select Then  Hit  Return  »« 
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Micro-Prolog  Error  Messages  - Selected  List 


According  to  McCabe,  et  al  [38],  there  are  three  types  of  errors  in  LPA  PROLOG  Professional: 
numbered  errors,  message  errors  and  initialization  errors.  A definition  of  each  of  the  three  types  and  a 
list  of  some  of  the  most  commonly  occurring  errors  with  messages  are  listed  below: 

Numbered  Errors  These  are  the  errors  that  can  occur  while  a PROLOG  program  is  running,  and  can  be 

recovered  from  by  LPA  PROLOG  Professional  programs  using  the  user  defmed  error  handler  "7ERROR?". 

3 Control  Error.  The  built-in  primitives  in  LPA  PROLOG  Professional  often  require  a minimum  number 

of  arguments  to  be  bound  at  the  time  of  the  call.  If  the  arguments  to  a call  to  such  a primitive  are 
underspecified,  this  error  occurs.  The  error  is  also  signalled  if  the  evaluation  encounters  any  goal  which  is 
not  of  the  correct  form,  such  as  a number,  or  list  without  a constant  as  its  first  element. 

5 File  Handling  Error.  This  error  is  signalled  when  an  error  arises  during  a file  operation.  For  example, 

if  you  try  to  open  a file  using  a filename  which  is  also  the  name  of  a program  relation  you  will  get  this  error. 
Other  examples  include  creating  a file  that  is  already  open,  trying  to  SEEK  to  one  of  the  special  files  like 
"TRM:",  or  performing  an  i/o  operation  with  an  unopened  file. 

7 Files  Open  on  Drive.  You  will  get  this  error  if  you  try  to  change  the  current  drive  (using  the  DRIVE 
primitive)  with  files  on  the  current  disk  still  open.  It  is  a good  idea  to  call  DRIVE  before  changing  disks 
to  check  that  there  are  no  files  left  open  on  the  current  one. 

8 Path  Not  Found.  This  error  occurs  when  you  specify  an  invalid  path  name.  For  example,  it  occurs  if  you 
try  to  change  directory  to  a non-existent  directory. 

10  Disk  or  Directory  Full,  You  get  this  error  if  the  disk  becomes  full,  or  no  more  directory  space  is  available 
for  a new  file. 

16  Window  Handling  Error.  This  error  occurs  when  there  is  an  illegal  use  of  windows.  It  occurs  if  you  try 
to  create  a window  with  a name  that  already  refers  to  a defmed  relation,  or  a currently  loaded  module,  or 
an  opjen  file,  or  another  window.  It  also  occurs  if  you  attempt  to  CLOSE  the  current  window. 

18  Not  Enough  Memory.  This  occurs  when  there  is  no  program  memory  left.  Program  memory  is  external 
to  PROLOG,  and  is  used  not  only  for  program  storage,  but  also  for  the  window  buffers,  and  by  EXEC  to 
execute  other  programs.  Progrm  memory  is  distinct  from  the  evaluation  space  (which  is  used  for  evaluating 
queries).  This  error  will  occur  when  there  is  insufficient  memory  to  create  a window,  or  to  all  a clause,  or 
to  EXEC  a command. 

25  Fixed  Format  Error.  The  formatted  I/O  primitives  (FW,  FR  and  FS)  invoke  this  error  when  the  type 
of  terms  conflict  with  the  format  specification,  or  when  an  output  field  is  too  narrow  for  the  term  being 
written. 

Message  Errors  Except  for  the  "internal  Error",  which  should  never  occur  (see  below),  these  errors  are 

a result  of  one  of  the  internal  memory  areas  becoming  foil.  When  these  errors  occur,  a message  is  displayed 
and  the  evaluation  aborts.  Message  errors  can  not  be  recovered  because  any  recovery  program  would 
probably  need  to  use  more  of  the  memory  resource  that  was  already  foil  and  had  signalled  the  error. 

Internal  Error  hhhh.  Trying  ppppp:  Exit  to  DOS  (y/n)? 
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Internal  Error  hhhh,  Trying  ppppp:  Exit  to  DOS  (y/n)? 

This  error  should  not  normally  arise,  and  occurs  when  LPA  PROLOG  Professional  detects  an  internal 
inconsistency  within  the  system.  It  may  mean  that  a vital  internal  data  structure  has  been  corrupted,  or  that 
DOS  has  returned  an  unexpected  error  code  after  a file  operation.  Note  that  a four  digit  hexadecimal  address 
hhhh  is  given  stating  where  the  error  was  discovered,  and  usually  so  is  the  name  of  the  program  ppppp 
that  signalled  the  error. 

Initialization  Errors  Before  LPA  PROLOG  Professional  can  begin  to  execute  commands  and  queries,  a number 
of  internal  initialization  must  be  carried  out.  These  include  loading  the  supervisor  programs,  setting  up 
window,  edit  and  file  buffers,  and  moving  relocatable  code  to  appropriate  places  in  memory.  Any  errors 
that  occur  duing  the  initialization  process  lead  to  a short  diagnostic  message  fllowing  by  a "System  Abort" 
to  DOS.  Examples  of  these  errors  are: 

Not  Enough  Memory  For  PROLOG  - System  Abort 

This  self  explanatory  message  is  issued  whenever  PROLOG  is  unable  to  obtain  enough  memory  to  install 
its  data  areas.  Possible  remedies  are:  start  again,  but  rquest  less  evaluation,  number,  text  and/or  buffer  space; 
check  there  are  no  memory-resident  programs  (Sidekick,  Ram  Disk  Software,  etc.)  using  up  too  much 
memory,  or  buy  more  RAM(!). 

Error  During  DOS  Memory  Allocation  • System  Abort 

This  error  occurs  when  DOS  is  unable  to  allocate  blocks  of  memory  for  the  supervisor  programs,  and  is 
related  to  the  "Not  Enough  Memory"  error.  Remedies  are  the  same. 


Section  4.3  - Add  a New  Application  of  PDA 

At  the  last  tutorial,  we  learned  how  to  activate  the  expert  system  PDA  on  drive  "A". 
If  you  wish  to  activate  PDA  on  a floppy  drive  named  "B",  you  need  to  request  a different 
version  of  the  floppy  92330FONG-1  because  the  Prolog  code  for  PDA  explicitly  identifies  which 
floppy  drive  the  code  PD  A.  LOG  resides. 

Once  you  enter  the  PDA  system,  you  will  see  a menu  on  the  screen  as  shown  on  page 

21.  Please  read  the  instructions  on  the  bottom  of  the  screen  where  it  says  "Use  Space-Bar  to 
Select  Then  Hit  Return."  If  you  wish  to  add  a new  application,  you  may  do  so  with  a 
carriage  return  because  the  cursor  (the  black  strip)  is  already  on  the  option  "Add  New 
Application."  On  page  22,  you  will  be  asked  to  name  your  application.  Please  use  quotation 
marks  if  your  application  name  consists  of  more  than  one  word.  Otherwise,  you  may  type  in 
a word  and  hit  the  carriage  return  to  activate  a 5-option  menu  as  shown  on  the  bottom  of  page 

22.  You  have  now  created  a brand  new  empty  database  named  "Fossil  Energy  Facilities." 
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PDA  Menu  for  Generic  Applications 


- DOE  N£  Perforaance  Indicator  Data  Analysis  Systen 
[—  PDA  (HIST/DOE  Expert  System,  p.  9Z.Z) 


fiiid  fleu  Hpp.l  i :.ctt  ion 


Delete  Old  Application 

DEIIO  (C-Cliart/  P-Chart/  Distribution  Chart/) 


1.  CH-AN  (Chicago/Argonne) 

2.  CH-BM  (Chicago/Brookhauen) 

3.  IDAHO  (Idaho  d Albuquerque/EGdG) 
i.  OAKRI  (Oak  Ridge/Hartin  flarietta) 


5.  RL-UH  (Richland/Uestinghouse-Hanford) 

6.  SF-LL  (San  Francisco/Laurence  Liuernore) 

7.  SF-RI  (San  Franc isco/lockue 11  International) 

8.  TOTAL  (Group  of  Facilities  with  PI  Data) 


-instruct  ions 

Use  Space-Bar  to  Select Then  Hit  Return  »« 
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PDA  Menu  for  Generic  Applications  - Continuation  Sheet 


DOE  NE  Perforiance  Indicator  Data  Analysis  Systen 

rHane  Your  Application 

Please  Mane  Your  Application 
"Fossil  Energy  Facilities"! 
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Section  4.4  - Exit  or  Re-start  from  Old  Application  of  PDA 

At  the  last  tutorial,  we  learned  how  to  create  a new  application  of  PDA  by  creating  a 
database  named  "Fossil  Energy  Facilities."  We  now  wish  to  leave  the  database  by  either 
returning  to  floppy  drive  "A"  (a  permanent  exit),  or  go  back  to  the  opening  menu  (re-start). 
As  shown  on  page  24,  we  need  to  learn  how  to  move  the  cursor  within  or  outside  the  window. 
The  ground  rules  are: 

Within  a window  RuleR-1:  Use  Space-Bar  to  change  option, 

and  use  Backspace  to  negate  the  change. 

Choose  an  option  Rule  R-2 : Use  Carriage-Return  to  activate  a new  window 

under  a chosen  option,  and  use  the 
Escape  Key  to  negate. 

Let  us  try  those  two  rules  to  learn  how  to  exit  or  re-start  from  an  old  application  of  PDA.  As 
shown  in  the  top  frame  on  page  24,  we  have  just  used  the  Space-Bar  four  times  to  move  from 
the  cursor  from  the  option  "indata"  to  the  option  "clean."  We  next  use  the  Carriage-Return  to 
activate  a new  window  under  the  option  "clean. " We  are  now  faced  with  four  choices.  One  of 
the  four  is  the  option  "exit."  So  to  exit  from  PDA  and  return  to  floppy  drive  "A",  one  needs 
to 


Exit  to  Drive  "A"  without  Save  1.  Use  Space-Bar  twice  to  move  the  cursor 

to  the  option  "exit." 

2.  Use  Carriage-Return  to  activate  another 

window  with  two  choices,  namely, 
"save"  or  "nosave." 

3.  Use  Space-Bar  once  to  move  the  cursor 

to  the  option  "nosave. " 

4.  Use  Carriage-Return  to  exit  permanently 

to  floppy  drive  "A". 

If  you  do  not  wish  to  exit  permanently,  do  not  take  step  4.  Instead,  use  Escape  Key  to  negate 
the  window  named  "quit"  and  return  to  the  window  named  "clean."  When  your  cursor  is  active 
in  the  window  named  "clean",  move  it  to  the  option  "restart"  as  shown  on  page  25,  and  hit 
Carriage-Return  to  return  to  the  opening  menu. 
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PDA  Menu  for  option  clean 


ifossil  Energy  Facilities 

indata  lists  disco 


analysis 


c lean 


■Fossil  Energy  Facilities 

indata  lists  disco 


analysis 


■clean- 
clear 
save 

restart 


•Fossil  Energy  Facilities 

indata  lists  disco 


-quit 


nosave 


clear 

save 

exit  I 
restart 
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PDA  Menu  for  option  clean  - Continuation  Sheet 


fossil  Energy  Facilities 

indata  lists  disco 


analysis 


-clean- 

clear 

saue 

exit 


- DOE  N£  Perfonance  Indicator  Data  Analysis  Systeii 
I-  PDA  (11IST/D0E  Expert  Systei,  n.  32.Z) 


fl i (1  fl5U  (ipp  1 iCdt  jpil 


Delete  Old  Application 

DEHO  (C-Chart/  P-Chart/  Distribution  Chart/) 


1.  CH-AN  (Chicago/Argonne) 

2.  CH-Btl  (Chicago/Brookhaven) 

3.  IDAHO  (Idaho  fi  Albuquerque/EGdO) 
d.  OAKRl  (Oak  Ridge/llartin  flarietta) 


5.  RL-HH  (Richlind/Uestlnghouse-Hanford) 

6.  SF-LL  (San  Francisco/Laurence  Liuernorc) 

7.  SF-RI  (San  Franc isco/Rockue 1 1 International) 

8.  TOTAL  (Group  of  Facilities  with  PI  Data) 

Fossil  Energy  Facilities 


■instruct  ions 

m»  Use  Space-Bar  to  Select Then  Hit  Return  »» 
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Section  4.5  - Delete  an  Old  Application  of  PDA 

At  the  last  tutorial,  we  learned  how  to  return  to  the  opening  menu  where  a new  entry 
named  "Fossil  Energy  Facilities"  has  just  been  added.  We  now  wish  to  learn  how  to  delete  an 
old  application.  On  page  27,  we  note  that  we  have  added  two  applications  to  the  opening  menu, 
namely,  "Fossil  Energy  Facilities"  and  "Solar  Energy  Facilities."  Our  goal  is  to  delete  the 
"Fossil  Energy  Facilities."  To  do  that,  use  the  Space-Bar  to  move  the  cursor  to  the  option 
named  "Delete  Old  Application."  Use  the  Carriage-Return  to  active  a window  named 
"Application  to  Delete."  This  window  consists  of  two  frames  with  the  first  one  given  on  the  top 
half  of  page  28.  Read  the  instructions  on  the  bottom  of  the  first  frame,  which  say: 

1.  Move  arrow  with  space-bar  or  backspace  key.  The  second  frame  will  show  up 

if  one  moves  the  arrow  down  far  enough  as  shown  on  the  lower  half  of  page  28. 

2.  Select  by  hitting  the  plus  sign  on  the  keyboard.  A black  strip  will  appear. 

3.  De-select  by  hitting  the  minor  sign.  The  cursor  (black  strip)  will  disappear. 

4.  After  selection(s)  are  made,  hit  the  Carriage-Return  to  delete. 

You  will  note,  as  shown  on  the  bottom  half  of  page  29,  that  the  database  named  "Fossil  Energy 
Facilities"  has  been  deleted.  Repeat  the  same  procedure  to  remove  the  database  named  "Solar 
Energy  Facilities,"  and  you  will  end  up  with  the  original  opening  menu  as  shown  on  pages  19 
and  30. 
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PDA  Menu  for  Generic  Applications 


■ DOE  HE  PerforMnce  Indicator  Data  Analysis  Systen  

p PDA  (HIST/DOE  Expert  Systen.  ».  92. Z)  

Add  Hew  Application 


Delete  OH  hiijt  1 i "dt  i rm 


DEHO  (C-Clart/  P-Chart/  Distribution  Chart/) 


1.  CH-AN  (Chicago/Argonne) 

2.  CH-BN  (Chicago/Brookhaven) 

3.  IDAHO  (Idaho  8 Albuquerque/E68G) 
i.  OAKRl  (Oak  Ridge/Hartin  Harietta) 


5.  RL-UH  (Rlchland/Uestlnghouse-Hanford) 

6.  SF-LL  (San  Francisco/Laurence  Livernore) 

7.  SF-RI  (San  Franc isco/lockue 11  International) 

8.  TOTAL  (Group  of  Facilities  with  PI  Data) 


Fossil  Energy  Facilities 
Solar  Energy  Facilities 


-instructions 

*»  Use  Space-Bar  to  Select Then  Hit  Return 
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PDA  Menu  for  Generic  Applications  - Continuation  Sheet 


r BOE  N£  Perforiance  Ivdicator  Data  <^na lysis  Systea 


[-Applications  to  Delete 

-1  of  2 

DEHO  (C-Chart/  P-Chart/  Distribution  Chart/) 


1.  CH-flfl  (Chicago/ftrgoiiTie) 

2.  CH-BN  (Chicago/Brookhauen) 

3.  IDAHO  (Idaho  S Albuquerque/EGftG) 

4.  OAKBI  (Oak  Bidge/Hartin  Marietta) 


5.  BL-UH  (Richland/Uestinghouse-Hanford) 

6.  SF-LL  (San  Franc iscb/Laurence  Liuernore) 


■Delete  old  Application 

Hove  arrow  uith  space-bar  or  backspace  key. 
Select  by  hitting  plus  sign  (<shift>  ^) 
Deselect  by  hitting  ainus  sign  (-) 

After  selections  have  been  aadei  hit  <enter> 


BOE  HE  Perforaance  Indicator  Data  Analysis  Systea 


(-Applications  to  Delete- 


rZ  of  2- 


7.  SF-BI  (San  Franc isco/Rockue 11  International) 

8.  TOTAL  (Group  of  Facilities  uith  PI  Bata) 

Fossil  Energy  Facilities«- 
Solar  Energy  Facilities 
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PDA  Menu  for  Generic  Applications  - Continuation  Sheet 


90E  HE  Perforiance  Indicator  Data  Analysis  Systen 


Appl i cat  ions  to  Delete 

-2  of  2 

7.  SF-m  (San  Francisco/Rockyell  International) 

8.  TOTAL  (Group  of  Facilities  uith  PI  Data) 


tossii  Energy  Eacilities 


Solar  Energy  Facilities 


■Delete  old  Application 

Hove  arrow  with  space-har  or  backspace  key. 
Select  by  kitting  plus  sign  (<shift>  «) 
Deselect  by  hittii^  ninus  sign  (-) 

After  selections  have  been  nade.  hit  <enter> 


■ ME  HE  PerforMRce  Indicator  Data  Analysis  Systen  

p PDA  (HISI/DOE  Expert  Systen,  n.  92.2)  

Add  Hew  Application 
Delete  Old  Application 

DEHO  (C-Chart/  P-Chart/  Distribution  Chart/) 


1.  CH-AN  (Chicago/Argonne) 

2.  CH-BN  (Chicago/Brookhauen) 

3.  IDAHO  (Idaho  d Albuquerque/EGdG) 
A.  OAXRl  (Oak  Ridge/Hartin  Harietta) 


5.  RL-UH  (Richland/Uestlnghouse-Hanford) 

6.  SF-LL  (San  Francisco/Lawrence  Livernore) 

7.  SF-Rl  (San  Franc isco/Rockue II  International) 

8.  TOTAL  (Group  of  Facilities  with  PI  Data) 


".'■-r  EitMiy  Ficihti-: 
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PDA  Menu  for  Generic  Applications  - Continuation  Sheet 


- BOE  HE  Perfonance  Indicator  Data  Analysis  Systen  

p PDA  (HIST/DOE  Expert  Systei.  «.  92.2)  

Add  Heu  Application 
Delete  Old  Application 

DEHO  (C-Ckart/  P-Chart/  Distribution  Chart/) 


1.  CH-AN  (Chicago/Argonne) 

2.  CH-BH  (Chicago/Brookhauen) 


IDAHj  ( l.iniio  Hlhne.ierLjin/Kbfiii ; 


A.  OAKRl  (Oak  Ridge/Hartin  Harietta) 


5.  RL-UH  (Richland/Uestlnghouse-Hanford) 

6.  SF-LL  (San  Francisco/Laurence  Liuertore) 

7.  SF-Rl  (San  Franc isco/Rockue 11  International) 

8.  TOTAL  (Group  of  Facilities  with  PI  Data) 


-instruct  ions — 

»»  Use  Space-Bar  to  Select Then  Hit  Return 
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Chapter  5 - Tutorial  Notes  on  DOE  Applications 

In  the  last  chapter,  we  learned  how  to  create  and  delete  a database  that  has  nothing  in  it 
except  a name  given  by  a user.  In  this  chapter,  we  shall  learn  how  to  input  data  and  generate 
files  that  eventually  can  be  processed  by  analysis  codes  for  specific  purposes.  Since  this  project 
arose  from  a consulting  request  from  the  U.  S.  Department  of  Energy  (DOE),  we  shall  design 
the  tutorials  around  the  DOE  applications  even  though  everything  we  say  here  applies  to  a non- 
DOE  application. 

To  begin  with,  let  us  examine  the  contents  of  a specific  datafile  diskette  [15]  that  we 
received  on  Nov.  1,  1991  as  part  of  a series  of  DOE  documents.  A listing  of  the  diskette  and 
a one-page  note  accompanying  the  diskette  are  given  below: 


4 File(8)  1297408  bytes  free 
Directory  of  A:\ 

Volume  in  drive  A does  not  have  a label 


PIQTRl 

LST 

62632 

10-23-91 

9:40a 

PIQTRIT 

LST 

8461 

10-23-91 

9:39a 

PIQTR2 

LST 

80274 

10-23-91 

9:41a 

PIQTR2T 

LST 

7831 

10-23-91 

9:39a 

NE  PI  DATA  - Quarters  1 & 2 

FIELD  FORMAT  DESCRIPTION 


TABLE 

YEAR 

QUARTER 

FIELD-OFFICE 

CONTRACTOR 

FACILITY 

PINO 

PIVALUE 


9(1) 

9(2) 

9(1) 

A(4) 

A(4) 

A(4) 

9(4) 

9(8). 9(10) 


PI  data  (1)  or  Root  cause  data  (2) 

Year 

Quarter 

Field  Office 

Contractor 

Facility 

PI  Number 

PI  Value 


NOTES 

- Files  PIQTRl.LST  & PIQTR2.LST  contain  all  facilities  data. 

- Files  PIQTRIT.LST  & PIQTR2T.LST  contain  IDAHO  & OAK  RIDGE  totals 
only.  This  is  the  field  office  data. 

- Table  1 is  for  PI  data,  Table  2 is  for  root  causes  corresponding 
to  table  1. 

- Pis  with  no  data  values  were  not  submitted  by  field  office 
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Notes  on  DOE  datafile  diskette  (continued): 

TABLE  1 

- PINO  field  Corresponds  to  actual  PI  Number  - Example:  PI  1.1  = 1100 
with  the  exception  of  Pis  1.5, 1.6, 4. 4, 4. 5. 

For  these  Pis,  PI  1.5.1  = 1520 
PI  1.5.2  = 1530 
PI  1.6.1  = 1620 
PI  4.4.1  = 4420 
PI  4.4.2  = 4430 
PI  4.5.1  = 4520 
PI  4.5.2  = 4530 

- PI  3.2.2/3220  is  expressed  in  thousands,  so  multiply  the  data 
value  by  1000,. 


TABLE  2 

- PINO  field  Corresponds  to  actual  PI  Number,  and  type  of  root  cause. 

Example  - PI  1.4  Root  cause  Material  = 1410 
Root  cause  Procedures  = 1420 
Root  cause  Personnel  = 1430 
Root  cause  Management  = 1440 
Root  cause  Design  = 1450 
Root  cause  Training  = 1460 
Root  cause  Other  « 1470 

To  design  a datafile  for  DOE  applications,  we  need  to  examine  the  row  and  column  structure  of 
a typical  collection  of  data  in  the  given  diskette.  The  following  is  a character-by-character 
display  of  a typical  row  of  data  extracted  from  the  file  named  PIQTRl.LST: 


121456789012345678901234567890123456789012345 

1 _ 9 1 _ 1 _ CH  _ ANEW  _EBR_  1530 96988.0000000000 

1 _ 9 1 _ 1 _ I D _ EG&G  _ AMCF  1530 1820.0000000000 

Of  the  8 fields  of  values  displayed  above  in  each  row,  the  first  6 can  be  lumped  together  to  identify  the 
table,  year,  quarter,  field-office,  contractor,  and  facility  corresponding  to  all  the  PI  numbers  (field  no. 
7)  and  their  values  (field  no.  8).  The  total  number  of  characters  occupied  by  the  first  6 fields  equals  19 
and  will  be  treated  in  our  typical  file  design  as  a single  column  of  19  ascii  characters  to  be  retrieved  as 
a single  variable  X.  The  second  column  of  our  typical  file  will  be  reserved  for  the  PI  number  (4- 
character)  and  will  be  retrieved  as  the  variable  Y.  The  third  column  under  the  variable  Z is  designed 
to  store  the  PI  value  with  a maximum  of  20  characters  including  ten  places  of  decimals,  the  decimal 
point,  eight  digits  between  1 and  99,999,999,  and  a sign.  With  a single  space  separating  X,  Y,  and  Z, 
the  width  of  each  row  of  data  becomes  (19  + 1 +4-1-  1 + 20)  or  45,  the  same  width  assigned  to  each 
row  of  data  in  the  DOE  diskette.  For  a complete  list  of  the  definitions  and  units  of  the  PI  numbers 
reported  by  DOE  facilities,  see  pp.  ix-x  of  this  report. 
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Section  5.1  - Activating  DOE  Application  3.  IDAHO 

The  data  files  furnished  by  DOE  on  Nov.  1,  1991  [15]  contain  PI  data  for  23  facilities 
as  reported  by  7 contractors  for  the  first  and  second  quarters  of  1991.  To  implement  the 
database  feature  of  the  expert  system  PDA,  we  follow  a naming  convention  for  the  7 contractors 
and  23  facilities  as  described  on  page  viii  of  this  report.  A two-layer  approach  is  used  to  satisfy 
the  initial  database  requirements  of  this  system.  The  first  layer  is  known  as  "Application",  and 
the  second,  the  "Database".  As  shown  on  the  next  page,  the  opening  menu  of  the  expert  system 
PDA  provides  9 applications  for  a DOE  user: 

Application  No.  Application  Title  ( City  / Contractor’s  Name  ) 


DEMO 

( C-Chart  / P-Chart  / Distribution  Chart ) 

FI 

CH-AN 

( Chicago  / Argonne) 

F2 

CH-BN 

( Chicago  / Brookhaven  ) 

F3 

IDAHO 

( Idaho  / Albuquerque  / EG&G  ) 

F4 

OAKRI 

( Oak  Ridge  / Martin  Marietta  ) 

F5 

RL-WH 

( Richland  / Westinghouse-Hanford  ) 

F6 

SF-LL 

( San  Francisco  / Lawrence  Livermore  ) 

F7 

SF-RI 

( San  Francisco  / Rockwell  International ) 

8 

TOTAL 

( Group  of  Facilities  with  PI  Data  ) 

Note  that  we  created  the  first  application  named  DEMO  specifically  to  generate  a series  of 
temporary  databases  for  learning  how  to  make  the  three  charts  required  by  DOE  for  reporting 
the  PI  data.  We  then  created  seven  more  applications,  one  for  each  contractor,  for  the  Phase- 1 
design  of  the  expert  system  PDA.  After  we  received  a new  set  of  DOE  data  on  Jan.  29,  1992 
[16],  we  modified  the  design  by  adding  an  additional  application  named  TOTAL  to  facilitate  the 
creation  of  special  databases  containing  PI  data  of  DOE  facilities  not  necessarily  grouped  under 
a single  contractor.  For  aesthetic  reasons,  we  also  dropped  the  prefix  "F"  in  the  application 
numbers  FI  through  F7. 

We  are  now  ready  to  select  a specific  application  to  begin  a series  of  tutorials  on  PDA. 
Two  keys  are  used  in  accomplishing  this  task:  the  space-bar  to  move  the  cursor  and  the  carriage- 
return  to  select.  The  bottom  figure  on  page  34  shows  the  result  of  selecting  Application  3. 
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PDA  Menu  for  DOE  Applications 


■ DOE  HE  Perforiance  Indicator  Data  Analysis  Systen  

p PDA  (HIST/DOE  Expert  Systeii  u.  92. Z)  

Add  Neu  Application 
Delete  Old  Application 

DEHO  (C-Chart/  P-Chart/  Distribution  Chart/) 


1.  CH-AN  (Chicago/Argonne) 

2.  CH-BM  (Chicago/Brookhauen) 


j.  IDAHO  (.  Idaho  H Alhiiquerqiie/LCifiN  j 


A.  OAXRI  (Oak  Ridge/Hartin  Harietta) 


5.  RL-UH  (Richland/Uestinghouse-Hanford) 

6.  SF-LL  (San  Franc isco/Laurence  Liuertore) 

7.  SF-RI  (San  Francisco/Rockuell  International) 

8.  TOTAL  (Group  of  Facilities  with  PI  Data) 


■instructions 

»»  Use  Space-Bar  to  Select Then  Hit  Return  »» 


r3.  IDAHO  (Idaho  S Albuquerque/EGSG) 


1 lui.t.td 


lists 


disco 


analysis 


clean 
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Section  5.2  - Exit  or  Re-start  from  DOE  Application  3.  IDAHO 


Let  us  review  all  the  steps  we  have  gone  through  so  far  as  a DOE  user; 


Section  Action  Item 

4.1  1.  Turn  computer  on. 

2.  Change  directory  to  DATAPLOT. 

3.  Prepare  to  activate  DBOS. 


4.  Control-Altemate-Delete. 


Screen  Display 

C:\> 

C:\>  cd  dataplot 
C:\DATAPLOT  > 

C:\DATAPLOT  > dpboot 
1 File(s)  copied 
1 File(s)  copied 
1 File(s)  copied 
1 File(s)  copied 

ifc  :to|c  ^ ^ ^ 94c  9^ 9)(  % afc  afc  sfe  afc  ^ ^ ^ a(c  :4c  ^ ^ ^ ^ ^ 

* PLEASE  MANUALLY  REBOOT  SYSTEM.* 

* UPON  REBOOTING,  ENTER  DP  * 

* TO  EXECUTE  DATAPLOT.  * 

C:\DATAPLOT  > 

C:\DATAPLOT  > 


4.2  1.  Insert  diskette  92330FONG-1  in  drive  "a" 

and  change  drive  to  "a". 


C:\DATAPLOT  > a: 
A:\> 


2.  Check  compatibility  on  command.com  A:\>  copy  c:\command.com 

3.  Activate  expert  system  PDA.  A:\>  pda 


Opening  Menu  (page  34  top) 


5.1  1.  Select  Application  3.  IDAHO. 


5-option  Bar  Menu  (page  34  bottom) 


As  shown  on  p.  36,  we  learn  how  to  exit  from  IDAHO  by  choosing  the  "clean"  option  with  the 
use  of  the  space-bar  key.  We  then  use  the  carriage-return  key  to  bring  out  a submenu  consisting 
of  4 options,  namely,  clear,  save,  exit,  and  restart.  Move  the  curser  to  restart  and  use  carriage- 
return  to  return  to  the  opening  menu.  Try  a different  application  and  then  practice  "exit". 
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PDA  Menu  for  option  clean 


-3.  IDAHO  (Idalio  5 Albuquerque/EGSG)  — 

indata  lists  disco  analysis 


3.  IDAHO  (Idaho  ft  Albuquerque/EGftG) 
indata  lists  disco  analysis 


;lean- 


saue 

exit 

restart 


r3.  IDAHO  (Idalio  ft 
indata  lists 


Albuquerque/EGftG) 

disco  analysis 


—clean 

clear 

saue 

exit 


r3.  IDAHO  (Idaho  ft  Albuquerque/EGftG) 
indata  lists  disco  analysis 


i-quit- 


saue 


1 

1103c  ue 

1 

-clean — 
clear 
saue 
exit 
restart 


I 
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Section  5.3  - Temporary  Access  to  DOS  using  option  disco 


In  Sections  5. 1 and  5.2,  we  learned  how  to  enter  and  leave  a DOE  application  by  using 
the  option  "clean"  in  the  5 -option  bar  menu.  In  this  section,  we  shall  learn  how  to  use  the 
option  "disco"  to  make  a temporary  exit  to  DOS. 

As  shown  on  page  38,  we  can  use  the  space-bar  to  move  the  cursor  to  the  option  "disco". 
We  then  use  the  carriage-return  key  to  open  up  a submenu  consisting  of  five  options: 


Ootion 

Name  of  Option 

Remarks 

Section 

1 

op_sys 

Temporary  access  to  DOS. 

(5.3) 

2 

splitfl_x 

File  partitioning  for  common  X. 

(5.4) 

3 

sav_dosfl 

File  save  as  a dos  file. 

(5.11) 

4a 

sav_dpdat 

File  save  as  a dataplot  file. 

(5.12) 

4b 

r_dpdat_y 

File  save  for  common  Y. 

(5.13) 

To  activate  the  first  option,  we  use  the  space-bar  to  move  the  cursor  to  the  option  named  op_sys 
and  then  use  the  carriage-return  to  leave  PDA  for  DOS.  The  result  of  this  maneuver  is  shown 
on  page  39  where  a dispaly  of  the  drive  "a"  is  given  on  the  lower  left  comer  of  the  screen. 


To  return  to  PDA,  type  exit  (see  page  39).  Use  the  < ESCAPE > key  to  clean  up  the 
screen.  To  activate  any  option  in  the  window  menu  of  PDA,  remember  to  use  the  carriage- 
return  to  open  up  a new  menu,  and  use  < ESCAPE > to  close  the  submenu  just  opened.  In 
short,  let  us  review  the  four  most  important  keys  in  running  an  expert  system: 

Goal  Name  of  Key  Function  of  Kev 


Choose  an  option  within  a window.  SPACE-BAR 

BACKSPACE 

Open  or  close  a window.  carriage-return 

ESCAPE 


Move  cursor  forward. 
Move  cursor  backward. 
Open  up  a submenu. 
Close  a submenu. 
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PDA  Menu  for  option  disco 


■3.  IDAHO  (Idako  S A 1 buquerque/^G ) 
indata  lists  analysis  clean 


3.  IDAHO  (Idaho  ft  Albuquerque/EGftG) 


indata 


lists 


i—disco- 


op_sys 
- 2 - 
splitf l_x 

- 3 - 
sa«_dosf 1 

- A - 


analysis 


satt_dpdat 

r_dpdat_y 


clean 


splitf l_x 

- 3 - 
sau_dosf 1 

- -1  - 
sau_dpdat 
r_dpdat_y 


-retrn 

Type  exit  <enter>  to  return  to  program 
Then  press  <escapc> 


DR  DOS  Release  5.0 

Copyright  (c)  1976,1982,1988,1330  Digital  Research  Inc.  All  rights  reserved. 
Ariia  Computer  Corporation 


A:\> 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


I sa«_dosfl  I 

-retrn 

Tgpe  exit  <enter>  to  return  to  program 
Then  press  <escape> 


DR  DOS  Release  5.0 

Copyright  (c)  1976,1982,1988,1930  Digital  Research  Inc.  All  rights  reserved. 
Arima  Computer  Corporation 

A A> 

A:s>  exit 


r-disco- 


- 1 - 


- 2 - 
splitri  X 

- 3 - 
sav_dosf I 

- A - 
sau_dpdat 
r_dpdat_y 
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Section  5.4  - DOE  Data  File  Partitioning  using  option  disco 

On  page  31,  we  learned  from  the  DOE  diskette  that  the  files  PIQTRl.LST  and 
PIQTR2.LST  contain  two  tables  of  data,  one  for  PI  data  and  the 'other  for  root  cause  data,  as 
reported  by  all  23  facilities  for  the  first  and  second  quarters  of  1991,  respectively.  Our  task 
here  is  to  learn  how  to  break  each  file  down  first  into  14  subfiles,  one  for  each  of  the  two  tables 
and  7 contractors,  and  then  into  as  many  smaller  files  as  there  are  facilities  operated  by  each 
contractor  such  that  each  smaller  file  contains  the  PI  data  for  just  a single  facility. 

In  writing  the  partitioning  subroutine  in  Micro-Prolog,  we  discovered  a system  limitation 
in  file  management,  i.e.,  Prolog  code  can  only  handle  filenames  of  length  up  to  eight  characters 
and  without  the  3-character  extension.  Consequently  we  have  to  rename  the  two  DOE  files  as 
follows: 


Original  Name  of  DOE  File  New  Name  of  DOE  File  for  Prolog  Code 

PIQTRl.LST  PIQTR1_X  (See  p.  187). 

PIQTR2.LST  PIQTR2_X  (See  p.  187). 

We  also  found  that  because  of  the  large  size  of  the  DOE  files,  it  is  not  efficient  time- wise  to  use 
a Prolog  subroutine  to  perform  the  first  of  the  two  partitioning  tasks,  namely,  the  breaking-down 
of  the  original  DOE  file  into  14  contractor-and-table-specific  files. 

To  illustrate  this,  we  used  a word  processing  editor  to  partition  the  1991  first  quarter 
DOE  file  PIQTR1_X  into  14  subfiles  as  follows: 


Name  of  DOE  File 


Name  of  Subfile  Name  of  Contractor 


PIQTRIX 


F1-911PI 

Chicago/ Argonne 

F1-911RC 

(Thicago/Axgonne 

F2-911PI 

Chicago/Brookhaven 

F2-911RC 

Chicago/Brookhaven 

F3-911PI 

Idaho/  Albuquerque/EG&G 

F3-911RC 

Idaho/Albuquerque/EG&G 

etc. 

Type  of  Data 

PI  Data 

Root  Cause  Data. 
PI  Data 

Root  Cause  Data. 
PI  data 

Root  Cause  Data 


We  then  used  the  sub-option  "splitfl_x"  under  the  option  "disco"  to  partition  each  subfile  into 
smaller  files  as  shown  on  pp.  41-49  for  a subfile  named  F3-911PI.  The  smaller  files  were 
named  F3 1-9 1-1,  F32-91-1,  etc.  to  allow  the  creation  of  databases  corresponding  to  each  facility 
under  consideration.  On  pp.  50-55,  we  did  the  same  for  subfile  F3-912PI. 
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PDA  Menu  for  option  disco 


3.  IDflHO  (Idaho  S (Hbuquerque/EGSG)  — 

indata  lists  analysis  clean 


p3.  IDAHO  (Idaho  S Albuquerque/EGIIG)  — 

indata  lists  i-^isco (analysis  clean 


- 1 - 
op_sys 
- 2 - 


- 3 - 
saM_dosf I 

- A - 
sau_dpdat 
r_dpdat_y 


r3.  IDAHO  (Idaho  ft 
indata  lists 


Albuquerque/EGftG) 


i-iiisco- 


- 1 - 


analysis 


op_sys 
- 2 - 


rchart 


clean 


Please  enter  naae  of  file  to  read 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


3.  IDf)H0  (Idaho  S ()lbuquerque/£6IIG) 


indata 


1 Isis 


f—disco — 
- 1 
op  sys 
- 2 


analysis 


rchart- 


clean 


Please  enter  naie  of  file  to  read 
PIQTR1_X| 


p3.  IDAHO  (Idaho  d Albuquerque/EGSG)  — 

indata  lists  r-<iisco lanalysis  clean 


- 1 - 
op_sys 


rchart- 


Please  enter  naae  of  file  to  read 
F3-911P1| 
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Sample  DOE  Data  - Filename:  F3-911PI 


1 

91 

1 

ID 

EG&G 

AMCF 

1100 

1 

91 

1 

ID 

EG&G 

AMCF 

1200 

1 

91 

1 

ID 

EG&G 

AMCF 

1300 

1 

91 

1 

ID 

EG&G 

AMCF 

1400 

1 

91 

1 

ID 

EG&G 

AMCF 

1520 

1 

91 

1 

ID 

EG&G 

AMCF 

1530 

1820.0000000000 

1 

91 

1 

ID 

EG&G 

AMCF 

1620 

1 

91 

1 

ID 

EG&G 

AMCF 

2100 

1 

91 

1 

ID 

EG&G 

AMCF 

2200 

1 

91 

1 

ID 

EG&G 

AMCF 

2300 

1.0000000000 

1 

91 

1 

ID 

EG&G 

AMCF 

2400 

38.0000000000 

1 

91 

1 

ID 

EG&G 

AMCF 

2500 

1 

91 

1 

ID 

EG&G 

AMCF 

2600 

1.0000000000 

1 

91 

1 

ID 

EG&G 

AMCF 

3110 

1 

91 

1 

ID 

EG&G 

AMCF 

3120 

1 

91 

1 

ID 

EG&G 

AMCF 

3210 

1 

91 

1 

ID 

EG&G 

AMCF 

3220 

1 

91 

1 

ID 

EG&G 

AMCF 

4100 

1 

91 

1 

ID 

EG&G 

AMCF 

4200 

1 

91 

1 

ID 

EG&G 

AMCF 

4300 

4.0000000000 

1 

91 

1 

ID 

EG&G 

AMCF 

4420 

10.0000000000 

1 

91 

1 

ID 

EG&G 

AMCF 

4430 

14.0000000000 

1 

91 

1 

ID 

EG&G 

AMCF 

4520 

1.0000000000 

1 

91 

1 

ID 

EG&G 

AMCF 

4530 

1.0000000000 

1 

91 

1 

ID 

EG&G 

AMCF 

4600 

1 

91 

1 

ID 

EG&G 

AMCF 

4711 

68.0000000000 

1 

91 

1 

ID 

EG&G 

AMCF 

4712 

1 

91 

1 

ID 

EG&G 

AMCF 

4713 

68.0000000000 

1 

91 

1 

ID 

EG&G 

AMCF 

4721 

1 

91 

1 

ID 

EG&G 

AMCF 

4722 

1 

91 

1 

ID 

EG&G 

AMCF 

4723 

1 

91 

1 

ID 

EG&G 

AMCF 

4731 

1 

91 

1 

ID 

EG&G 

AMCF 

4732 

1 

91 

1 

ID 

EG&G 

AMCF 

4733 

1 

91 

1 

ID 

EG&G 

ATR 

1100 

6.4500000000 

1 

91 

1 

ID 

EG&G 

ATR 

1200 

1.0000000000 

1 

91 

1 

ID 

EG&G 

ATR 

1300 

1 

91 

1 

ID 

EG&G 

ATR 

1400 

1 

91 

1 

ID 

EG&G 

ATR 

1520 

1 

91 

1 

ID 

EG&G 

ATR 

1530 

128347.0000000000 

1 

91 

1 

ID 

EG&G 

ATR 

1620 

1 

91 

1 

ID 

EG&G 

ATR 

2100 

1 

91 

1 

ID 

EG&G 

ATR 

2200 

1 

91 

1 

ID 

EG&G 

ATR 

2300 

1 

91 

1 

ID 

EG&G 

ATR 

2400 

1 

91 

1 

ID 

EG&G 

ATR 

2500 

4.0000000000 

1 

91 

1 

ID 

EG&G 

ATR 

2600 

2.0000000000 

1 

91 

1 

ID 

EG&G 

ATR 

3110 

932.0000000000 

1 

91 

1 

ID 

EG&G 

ATR 

3120 

49.9000000000 

1 

91 

1 

ID 

EG&G 

ATR 

3210 

1 

91 

1 

ID 

EG&G 

ATR 

3220 

1 

91 

1 

ID 

EG&G 

ATR 

4100 

1 

91 

1 

ID 

EG&G 

ATR 

4200 

1 

91 

1 

ID 

EG&G 

ATR 

4300 

17.0000000000 

1 

91 

1 

ID 

EG&G 

ATR 

4420 

28.0000000000 

1 

91 

1 

ID 

EG&G 

ATR 

4430 

69.0000000000 

1 

91 

1 

ID 

EG&G 

ATR 

4520 

5.0000000000 

1 

91 

1 

ID 

EG&G 

ATR 

4530 

197.0000000000 

1 

91 

1 

ID 

EG&G  ATR 

4600 
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1 

91 

1 

ID 

EG&G 

ATR 

4711 

1885.8000000000 

1 

91 

1 

ID 

EG&G 

ATR 

4712 

1 

91 

1 

ID 

EG&G 

ATR 

4713 

1885.8000000000 

1 

91 

1 

ID 

EG&G 

ATR 

4721 

1 

91 

1 

ID 

EG&G 

ATR 

4722 

1 

91 

1 

ID 

EG&G 

ATR 

4723 

1 

91 

1 

ID 

EG&G 

ATR 

4731 

1 

91 

1 

ID 

EG&G 

ATR 

4732 

1 

91 

1 

ID 

EG&G 

ATR 

4733 

1 

91 

1 

ID 

EG&G 

MD50 

1100 

.1900000000 

1 

91 

1 

ID 

EG&G 

MD50 

1200 

1 

91 

1 

ID 

EG&G 

MD50 

1300 

1 

91 

1 

ID 

EG&G 

MD50 

1400 

1 

91 

1 

ID 

EG&G 

MD50 

1520 

1 

91 

1 

ID 

EG&G 

MD50 

1530 

1 

91 

1 

ID 

EG&G 

MD50 

1620 

1 

91 

1 

ID 

EG&G 

MD50 

2100 

1 

91 

1 

ID 

EG&G 

MD50 

2200 

3.0000000000 

1 

91 

1 

ID 

EG&G 

MD50 

2300 

1 

91 

1 

ID 

EG&G 

M050 

2400 

1 

91 

1 

ID 

EG&G 

MD50 

2500 

1 

91 

1 

ID 

EG&G 

MD50 

2600 

1 

91 

1 

ID 

EG&G 

HD50 

3110 

1 

91 

1 

ID 

EG&G 

HD50 

3120 

1 

91 

1 

ID 

EG&G 

MD50 

3210 

1 

91 

1 

ID 

EG&G 

M050 

3220 

1 

91 

1 

ID 

EG&G 

MD50 

4100 

1 

91 

1 

ID 

EG&G 

MD50 

4200 

1 

91 

1 

ID 

EG&G 

MD50 

4300 

1 

91 

1 

ID 

EG&G 

MD50 

4420 

5.0000000000 

1 

91 

1 

ID 

EG&G 

HD50 

4430 

12.0000000000 

1 

91 

1 

ID 

EG&G 

HD50 

4520 

1 

91 

1 

ID 

EG&G 

HD50 

4530 

62.0000000000 

1 

91 

1 

ID 

EG&G 

HD50 

4600 

1 

91 

1 

ID 

EG&G 

MD50 

4711 

1 

91 

1 

ID 

EG&G 

MD50 

4712 

1 

91 

1 

ID 

EG&G 

MD50 

4713 

1 

91 

1 

ID 

EG&G 

MD50 

4721 

1 

91 

1 

ID 

EG&G 

MD50 

4722 

1 

91 

1 

ID 

EG&G 

MD50 

4723 

1 

91 

1 

ID 

EG&G 

MD50 

4731 

1 

91 

1 

ID 

EG&G 

MD50 

4732 

1 

91 

1 

ID 

EG&G 

MD50 

4733 

1 

91 

1 

ID 

EG&G 

TRHC 

1100 

.5000000000 

1 

91 

1 

ID 

EG&G 

TRHC 

1200 

1 

91 

1 

ID 

EG&G 

TRHC 

1300 

1 

91 

1 

ID 

EG&G 

TRHC 

1400 

1 

91 

1 

ID 

EG&G 

TRHC 

1520 

1 

91 

1 

ID 

EG&G 

TRHC 

1530 

2508.0000000000 

1 

91 

1 

ID 

EG&G 

TRHC 

1620 

1 

91 

1 

ID 

EG&G 

TRHC 

2100 

1 

91 

1 

ID 

EG&G 

TRHC 

2200 

1 

91 

1 

ID 

EG&G 

TRHC 

2300 

1 

91 

1 

ID 

EG&G 

TRHC 

2400 

7.0000000000 

1 

91 

1 

ID 

EG&G 

TRHC 

2500 

1 

91 

1 

ID 

EG&G 

TRHC 

2600 

1.0000000000 

1 

91 

1 

ID 

EG&G 

TRHC 

3110 

.0000000000 

1 

91 

1 

ID 

EG&G 

TRHC 

3120 

1 

91 

1 

ID 

EG&G 

TRHC 

3210 

1 

91 

1 

ID 

EG&G 

TRHC 

3220 

1 

91 

1 

ID 

EG&G 

TRHC 

4100 

1 

91 

1 

ID 

EG&G 

TRHC 

4200 

1 

91 

1 

ID 

EG&G 

TRHC 

4300 

1 

91 

1 

ID 

EG&G 

TRHC 

4420 

1 

91 

1 

ID 

EG&G 

TRHC 

4430 

1.0000000000 
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1 

91 

1 

ID 

EGSG 

TRHC 

4520 

1.0000000000 

1 

91 

1 

ID 

EG&G 

TRHC 

4530 

4.0000000000 

1 

91 

1 

ID 

EG&G 

TRHC 

4600 

1 

91 

1 

ID 

EG&G 

TRHC 

4711 

268.0000000000 

1 

91 

1 

ID 

EG&G 

TRHC 

4712 

1 

91 

1 

ID 

EG&G 

TRHC 

4713 

268.0000000000 

1 

91 

1 

ID 

EG&G 

TRHC 

4721 

1 

91 

1 

ID 

EG&G 

TRHC 

4722 

1 

91 

1 

ID 

EG&G 

TRHC 

4723 

1 

91 

1 

ID 

EG&G 

TRHC 

4731 

1 

91 

1 

ID 

EG&G 

TRHC 

4732 

1 

91 

1 

ID 

EG&G 

TRHC 

4733 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


3.  IDAHO 

indata 


(Idaho  S Albuquerque/EGSG) 


lists 


r-disco — 
- 1 
op_sys 
- 2 


analysis 


clean 


3.  IDAHO  (Idaho  II  Albuquerque/EGIIG) 


indata 


lists 


(-disco 

- 1 - 
op  sys 
- 2 - 


analysis  clean 


rchart- 


Please  enter  naae  of  file  to  read 


F3-911P1 

Please  nane  output  file 
F31-91-l| 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


r3.  IDAHO  (Idaho  ft  Albuquerque/EGftG) 


indata 


lists 


r-disco- 


- 1 - 
op_sys 
- 2 - 


|— X-Mdlues- 
rl  of  1 


analysis  clean 


ID  EGftG  ATR 
ID  EGftG  HDSO 
ID  EGftG  IRHC 
ID  EGftG  IRHC 


file  to  read 
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Fong,  Bernstein  & Filliben  (1992)  on  "PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data" 


PDA  Menu  for  option  disco  - Continuation  Sheet 


sag_dosf I 
- 4 - 
sao_dpdat 
r_dpdat_y 


-retrn 

Type  exit  <enter>  to  return  to  program 
Then  press  <escape> 


DR  DOS  Release  5.0 

Copyright  (c)  1376,1982,1988,1838  Digital  Research  Inc.  All  rights  reserved. 
Arina  Conputer  Corporation 

A:\>  TYPE  F31-91-1  I flORE 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


1 

91 

1 

ID 

E6&G 

AMCr 

1100 

0.0000000000 

1 

91 

1 

ID 

EGaG 

AHCr 

1Z06 

0.0600000000 

1 

91 

1 

ID 

EGaG 

ftflCF 

1300 

0.0000000000 

1 

91 

1 

ID 

EGaG 

AHCr 

1406 

0 0000000000 

1 

91 

1 

ID 

EGaG 

AHCr 

1520 

0.0000000000 

1 

91 

1 

ID 

EGaG 

finer 

1530 

1820.0000000000 

1 

91 

1 

ID 

EGaG 

finer 

1620 

0.0000080008 

1 

91 

1 

ID 

EGaG 

finer 

2100 

0.0000000009 

1 

91 

1 

ID 

EGaG 

finer 

2200 

0.0000000008 

1 

91 

1 

ID 

EGaG 

finer 

2300 

1.0000000000 

1 

91 

1 

ID 

EGaG 

finer 

2400 

38  0000080000 

1 

91 

1 

ID 

EGaG 

finer 

2500 

0.0600080008 

1 

91 

1 

ID 

EGaG 

finer 

2600 

1.8800080000 

1 

91 

1 

ID 

EGaG 

finer 

3110 

0.0800000008 

1 

91 

1 

ID 

EGaG 

finer 

3120 

0.0800080008 

1 

91 

1 

ID 

EGaG 

finer 

3210 

0.0800080008 

1 

91 

1 

ID 

EGaG 

finer 

CM 

CM 

0.0000080000 

1 

91 

1 

ID 

EGaG 

finer 

4100 

0.0800080000 

1 

91 

1 

ID 

EGaG 

finer 

4200 

0.0800080008 

1 

91 

1 

ID 

EGaG 

finer 

4300 

4.0000000000 

1 

91 

1 

ID 

EGaG 

finer 

4420 

10.0800080000 

1 

91 

1 

ID 

EGaG 

finer 

4430 

14.0800080000 

1 

91 

1 

ID 

EGaG 

finer 

4520 

1.0800080088 

1 

91 

1 

ID 

EGaG 

finer 

4530 

1.0800080008 

1 

91 

1 

ID 

EGaG 

finer 

4600 

0.0800080000 

1 

91 

1 

ID 

EGaG 

finer 

4711 

68.0800080008 

1 

91 

1 

ID 

EGaG 

finer 

4712 

0.0800080008 

1 

91 

1 

ID 

EGaG 

finer 

4713 

68. 0800080008 

1 

91 

1 

ID 

EGaG 

finer 

4721 

0.0000000008 

1 

91 

1 

ID 

EGaG 

finer 

4722 

0.8800880088 

1 

91 

1 

ID 

EGaG 

finer 

4723 

0.0800080000 

1 

91 

1 

ID 

EGaG 

finer 

4731 

0.0000080000 

1 

91 

1 

ID 

EGaG 

finer 

4732 

0.0800080008 

1 

91 

1 

ID 

EGaG 

finer 

4733 

0.0800080000 

(\ 

:\> 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


r3.  1D<)H0  (Idaho  S 
indata  lists 


Albuquerque/E6SG) 

i—disco [analysis 


- 1 - 
op_sys 
- 2 - 


- 3 - 
sau_dosf 1 

- A - 
sau_dpdat 
r_dpdat_y 


clean 


r3.  IDAHO  (Idaho  S Albuquerque/EGSG)  — 

indata  lists  [—disco [analysis  clean 


1 - 


op_sys 


2 - 


rchart- 


P lease  enter  nate  of  file  to  read 
F3-912P1| 
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Sample  DOE  Data  - Filename:  F3-912PI 


1 

91 

2 

ID 

EG&G 

AMCF 

1100 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

1200 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

1300 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

1400 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

1520 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

1530 

3891.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

1620 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

2100 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

2200 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

2300 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

2400 

3.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

2500 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

2600 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

3110 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

3120 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

3210 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

3220 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4100 

1.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4200 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4300 

3.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4420 

11.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4430 

18.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4520 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4530 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4600 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4711 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4712 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4713 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4721 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4722 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4723 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4731 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4732 

0.0000000000 

1 

91 

2 

ID 

EG&G 

AMCF 

4733 

0.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

1100 

5.4200000000 

1 

91 

2 

ID 

EG&G 

ATR 

1200 

1.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

1300 

0.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

1400 

0.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

1520 

0.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

1530 

142772.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

1620 

3.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

2100 

0.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

2200 

0.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

2300 

0.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

2400 

69.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

2500 

6.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

2600 

3.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

3110 

978.3000000000 

1 

91 

2 

ID 

EG&G 

ATR 

3120 

31.6500000000 

1 

91 

2 

ID 

EG&G 

ATR 

3210 

0.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

3220 

0.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

4100 

6.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

4200 

0.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

4300 

0.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

4420 

27.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

4430 

60.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

4520 

9.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

4530 

134.0000000000 

1 

91 

2 

ID 

EG&G 

ATR 

4600 

0.0000000000 
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1 

91 

2 

ID 

EG&G 

ATR 

4711 

2782 

1 

91 

2 

ID 

EG&G 

ATR 

4712 

0 

1 

91 

2 

ID 

EG&G 

ATR 

4713 

2782 

1 

91 

2 

ID 

EG&G 

ATR 

4721 

0 

1 

91 

2 

ID 

EG&G 

ATR 

4722 

0 

1 

91 

2 

ID 

EG&G 

ATR 

4723 

0 

1 

91 

2 

ID 

EG&G 

ATR 

4731 

0 

1 

91 

2 

ID 

EG&G 

ATR 

4732 

0 

1 

91 

2 

ID 

EG&G 

ATR 

4733 

0 

1 

91 

2 

ID 

EG&G 

TRHC 

1100 

0 
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PDA  Menu  for  option  disco  - Continuation  Sheet 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


DR  DOS  Release  5.0 

Copyright  (c)  1976,1982,1988,1330  Digital  Research  Inc.  All  rights  reserued. 
Ariaa  Conputer  Corporation 


A:\>  TYPE  F31-91-2 


54 


Fong,  Bernstein  & Filliben  (1992)  on  "PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Dau 


PDA  Menu  for  option  disco  - Continuation  Sheet 
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Section  5.5  - Keyboard  Input  of  New  Data  using  option  indata 

With  this  section,  we  begin  a series  of  5 tutorials  on  how  to  store  new  and  manage  old 
data  in  a database  that  has  already  been  created  within  a specific  DOE  or  non-DOE  application. 
The  five  tutorials  are: 


ction 

Obiective  usine  option  "indata" 

Reference 

5.5 

Keyboard  input  of  New  Data. 

pp.  56-61. 

5.6 

Review  of  Old  Data. 

pp.  62-63. 

5.7 

Revision  of  Old  Data. 

pp.  64-66. 

5.8 

Deletion  of  Old  Data. 

pp.  67-70. 

5.9 

File  Input  of  New  Data. 

pp.  71-73. 

For  ease  of  displaying  a multiple- window  format  on  an  80-character- wide  screen,  we  design  a 
typical  data  point  as  a single  row  of  characters  not  to  exceed  73  spaces  after  we  take  into 
account  of  the  necessary  clearances  between  data  and  window  frames.  Since  this  project  is  co- 
sponsored by  the  Department  of  Energy,  we  settled  on  a design  that  will  accomodate  the  3- 
column  Performance  Indicator  (P.I.)  data  as  described  on  page  32.  For  every  such  3-column 
P.I.  data,  we  need  to  tag  it  with  two  more  columns  of  information,  namely,  one  for  a user- 
defined  database  identifier  (I.D.)  and  the  other  for  a user-defined  data  I.D.  The  resulting  5- 
column  format  for  a typical  row  in  a PDA  database  is  shown  below: 


Column  1 

Column  2 

Column  3 

Column  4 

Column  5 

User-Defined 

X 

Y 

Z 

User-Defined 

Database  I.D. 

(Facility  I.D.) 

(P.I.  No.) 

(P.I.  Value) 

Data  I.D. 

[wl]  = 

[15  char.] 

[19  char.] 

[5  char.] 

[18  char.] 

[4  char.] 

{w2}  = 

[3  char.] 

[4  char. 

.]  [3  char.] 

[2  char.] 

Note  that  the  73-character  row  width  of  each  data  point  is  divided  into  segments  of  five  wl’s 
and  four  w2’s  where  wl  denotes  the  number  of  characters  in  each  column  of  data  and  w2 
the  number  of  spaces  between  every  two  neighboring  columns.  Following  a series  of  steps  for 
a menu-driven  input  routine  as  shown  on  page  57,  a DOE-user  will  first  select  the  keyboard 
option  (page  58,  top),  then  select  the  name  of  a database  from  a table  (page  58,  bottom),  the 
year  and  quarter  also  from  a table  (page  59,  top),  type  in  the  I.D.  of  a data  point  (page  59, 
bottom),  and  finally  type  in  the  values  of  a 3-column  data  (page  60,  top).  An  example  of  a 
typical  data  point  so  generated  is  given  in  the  bottom  figure  of  page  60. 
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PDA  Menu  for  option  indata 
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-text 

old-ndata 


lid  lUidtd 


del-ndata 


57 


Fong,  H^mstcm  & Fillibcn  (1992)  on  PDA.  A PO-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data* 


PDA  Menu  for  option  indata  - Continuation  Sheet 


1 ists 
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{-3.  IDAHO  (Idaho  & Albuquerque/EG&G) 

I— indata 

text  I 
binary 


analysis  clean 


-neu-data 

Do  you  wish  to  enter  a ncu  n-data  ualue  froa  the  keyboard j 

or  do  you  uish  to  read  data  froa  a file? 

[— keyhd  or  file 


keyboard 


file 


p3.  IDAHO 
I— indata— 


(Idaho  S Albuquerque/EGSG) 


lists 


disco 


analysis 


text  I 
binary 


clean 


[-  Facility 


F 1 


F-2 

F-3 

F-4 

F-5 

F-6 

F-7 


Meaning  of  Facility  Designation 

F-1I31  AHCr  (Adu  React  Heas  Fac  I Coupled  Fast  RHF) 
F-2I31  ATR  (Aduanced  Test  Reactor) 

F-3 131  CONI  (Contractor) 

F-4I31  HD50  (Alpha  Fuels  Fac  - Hound  Plant/Bldg  50) 
F-5t31  TRHC  (Test  Reactor  Hot  Cell  Facility) 

F-6131 

F-7131 
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PDA  Menu  for  option  indata  - Continuation  Sheet 


lists 


|-3.  ID()H0  (Idaho  d fllbuquerque/£6SG) 
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disco  analysis 


clean 
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FI 
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text 
binary 
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lists 


disco 


analysis 


clean 


Meaning  of  Facility  Designation 

F-1I31  MHCF  (9du  React  Heas  Fac  ft  Coupled  Fast  RMF) 
F-2I31  ATR  (Adoanced  Test  Reactor) 

-neu-data 


Please  enter  the  naie  label  (e.g.j  1,  2,  3.  Al,  A2,  etc.) 
of  the  neu  data  point  (n-data)  below: 

(Six  characters  naxinun) 

4 
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PDA  Menu  for  option  indata  - Continuation  Sheet 
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disco 


analysis  clean 


-old-data 
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FI  1991-1 


0 G 0.0000069008  4 


Please  enter  new  obserued  x-data  44 
Please  enter  new  obserued  y-data  55 
Please  enter  new  observed  z-data  66| 


r3.  IDOHO  (Idaho  ft 


i— indata- 
text 
binary 


I 


lists 


Olbuquerque/EGftG) 

disco  analysis  clean 


-neu-data^ 

DOE  Facility  No.  1 new  observation  n-data 

FI 1991-1  44  55  66.0000000000  4 


r-entry- 


enter 


repeat 
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PDA  Menu  for  option  indata  - Continuation  Sheet 
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Continue? — 
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no 


to  another  list 


61 


Fong,  Bernstein  & Filliben  (1992)  on  "PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data’ 


Section  5.6  - Review  Old  Data  using  option  indata 

In  Section  5.5,  we  learned  to  use  the  keyboard  to  input  new  data  by  invoking  the  "indata" 
option  of  the  5-option  bar  menu  that  is  standard  for  each  application. 

In  this  section,  we  like  to  know  whether  the  newly-input  data  points  have  been  correctly 
stored.  There  are  two  ways  to  do  this,  one  through  the  first  option  "indata"  and  the  other 
through  the  second  option  "lists".  Since  we  have  just  invoked  "indata",  it  would  be  easier  to 
stay  with  it,  review  the  content  of  the  database,  and  make  corrections  if  needed.  Using  the 
second  option  "lists",  as  described  in  Section  5.10,  does  not  allow  on  to  make  changes. 

On  page  63,  we  show  an  abbreviated  sequence  of  steps  to  review  old  data  after  we  hit 
carriage-return  to  open  a submenu  under  the  option  "indata"  as  described  below: 

Step  1 For  the  submenu  under  "indata"  with  two  options,  "text"  and  "binary", 

choose  "text"  by  hitting  the  carriage-return  again. 

Step  2 For  the  submenu  under  "text"  with  3 options,  "old-ndata",  "add-ndata", 

and  "del-ndata",  choose  "old-ndata"  by  hitting  the  carriage-return.  At  this 
point,  we  need  to  go  to  page  58  (bottom  figure)  to  see  a menu  of  facilities. 

Step  3 Use  space-bar  to  select  the  facility  and  hit  carriage-return  to  display 

another  menu  with  choices  on  the  year  and  quarter  of  the  database. 

Step  4 Use  space-bar  to  select  the  year  and  quarter  of  the  database.  Hit  carriage- 

return  to  open  the  database  for  the  specific  facility,  year,  and  quarter. 

Step  5 At  this  point,  you  have  two  choices.  Either  the  database  is  empty  and  you 

will  be  told  so,  and  the  control  returns  to  the  option  "indata".  If  the 
database  is  not  empty,  there  will  be  a display  of  a menu  named  "next-step" 
with  two  options,  "enter  dat"  or  "see  all",  as  shown  on  page  63. 

Step  6 Use  space-bar  to  select  the  option  "see  all"  and  hit  carriage-return.  A 5- 

column  display  of  all  the  data  in  the  database  for  the  specific  facility,  year, 
and  quarter,  appears  on  the  screen.  If  the  screen  is  not  big  enough  to 
display  all  the  data,  use  any  key  to  see  the  next  page  until  the  database  is 
fully  displayed.  After  you  review  the  data,  type  any  letter  to  return  control 
again  to  "next  step".  If  the  data  are  correctly  entered,  type  "escape"  to 
go  back  to  "indata".  Otherwise,  select  "enter  dat",  and  hit  carriage-return 
to  revise  the  data  as  described  in  the  next  section. 
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PDA  Menu  for  option  indata 
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Section  5.7  - Revise  Old  Data  using  option  indata 

To  revise  old  data  using  the  option  "indata",  we  essentially  follow  the  same  first  five 
steps  as  described  in  the  last  section  where  we  were  given  a submenu  named  "next-step"  with 
two  choices,  "enter  dat"  or  "see  all". 

As  shown  on  page  65,  we  select  "enter  dat"  and  hit  carriage-return  to  reveal  two 
windows,  one  on  the  left  showing  a listing  of  data  point  identifiers  and  the  other  on  the  right 
showing  the  database  identifier.  This  is  a safety  feature  to  ensure  that  the  database  you  are 
making  changes  to  is  the  correct  one. 

Use  the  space-bar  to  select  a data  point  in  the  left  window  menu.  Hit  carriage- return  to 
see  a display  of  the  old  data  as  entered  in  the  correct  database.  You  are  now  free  to  enter  a set 
of  revised  values  for  the  3-column  data,  X,  Y.  Z,  as  shown  on  the  bottom  figure  of  page  65. 

When  you  finish  entering  the  revised  data,  you  will  be  asked  to  activate  an  option  named 
"enter"  to  actually  commit  the  change.  If  you  happen  to  have  made  an  error  in  your  data  entry, 
you  can  select  the  option  "repeat"  to  return  to  the  previous  step  so  that  no  change  to  your 
database  will  occur.  After  the  correct  revision  is  committed,  you  will  be  asked,  as  shown  on 
page  66,  whether  you  wish  to  alter  another  data  point.  Follow  the  instructions  and  you  can 
revise  as  many  data  points  as  you  wish  until  you  are  completely  satisfied. 
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PDA  Menu  for  option  indata 
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|-3.  IDAHO  (Idaho  S Albuquerque/EGftG) 


I— indata- 
text 
binary 


I 


lists 


disco 


analysis 


[-data  pt- 


clean 


Ohange  old  data 

ri 1931-1 

Select  point  to  alter 
froa  menu  at  left 


[-3.  IDAHO  (Idaho  ft  Albuquerque/EGftG) 


I— indata- 


lists 


disco 


analysis 


text  I 
binary 


clean 


old-data — 

DOE  Facility  No.  1 old  observation  n-data 


FI  1991-1 


4 4 4.0000060000  1 


Please  enter  ney  observed  x-data  14 
Please  enter  new  observed  y-data  13 
Please  enter  new  observed  z-data  1Z| 
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lists 


disco 


p3.  IDflHO  (Idaho  ft  Olbuquerque/EGftG) 

i— indata 

text  I 
binary 


analysis 


clean 


-neu-data 

DOC  Facility  No.  1 neu  observation  n-data 


FI  1991-1 


14  13  12.0000000860  1 


p-entry 


-enter  - 


repeat 


p3.  IDOHO 

I— indata- 


( Idaho  ft  Olbuquerque/EGftG) 


1 ists 


disco 


analysis 


text  I 
binary 


clean 


Continue? — 

list  FI 1991-1 

Do  you  uish  to  alter  another  point? 


r-  goon 


idne  ist 


no 

in  another  list 
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Section  5.8  - Delete  Old  Data  using  option  indata 

To  delete  old  data  using  option  "indata",  we  following  a sequence  of  steps  after  we  hit 
carriage-return  to  open  a submenu  as  shown  on  pp.  68-69  and  described  below: 

Step  1 For  the  submenu  under  "indata"  with  two  options,  "text"  and  "binary", 

choose  "text"  by  positioning  the  cursor  there  and  hitting  the  carriage- 
return. 

Step  2 For  the  submenu  under  "text"  with  3 options,  "old-ndata",  "add-ndata", 

and  "del-ndata",  use  space-bar  to  position  cursor  on  the  option  "del-ndata" 
and  hit  carriage-return  to  reveal  two  window  menu  as  shown  on  page  68 
(bottom  figure). 

Step  3 For  the  window  menu  named  "deletion  method",  use  space-bar  to  position 

cursor  to  either  the  two  options,  "Selected  Data"  or  "All".  For  this 
tutorial,  we  choose  to  work  with  the  option  "Selected  Data". 

Step  4 Hit  the  carriage  return  after  selected  the  option  "Selected  Data".  On  page 

69,  you  will  see  a display  of  two  window  menus,  one  on  the  left  with  a 
choice  of  data  points  to  be  deleted,  and  the  other  on  the  right  containing 
the  name  of  the  database  and  instructions  on  how  to  select  and  delete. 
Read  the  instructions  carefully  before  deleting  any  data  because  all  steps 
of  deletion  are,  once  committed,  irreversible. 

Step  5 On  page  70,  we  repeat  the  steps  described  in  Section  5.6  to  review  the  old 

data  in  a database  after  we  have  made  a deletion  to  verify  whether  the 
content  of  the  database  is  correct. 
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analysis  clean 
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old-ndata 
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r— indata 1 lists  disco  analysis  clean 

text  I 
binary 


De 


eting  data  points 

Hou  do  you  ulsh  to  proceed  uith  deletions 
of  selected  data  in  database  named: 

3.  IDAHO  (Idaho  ft  Albuquerque/EGftG) 


i-deletionBcthod^ 

IHBEDSHSS 

All 
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p3.  IMHO  (Idaho  ft  Olbuquerque/EGftG) 


-indata 1 1 ists 

I— deletions 

rl  of  1 


disco  analysis  clean 
— I rSelect  Deletions 


Category  FI lSSl-1 

To  the  left  is  a lultiple  choice  lenu 

Space  bar  or  backspace  key  uill  nove  arrou 

Uhen  arrow  is  on  a select  ion j Use 
plus  sign  to  highlight  it 
ninus  sign  to  renoue  highlight 

<ctrl>J  uill  highlight  all  itews 
<ctrl>L  uill  renoue  all  highlights 

Uhen  highlighting  is  conplete.  press  <ENT£R> 
to  delete  highlighted  data 


p3.  IDAHO  (Idaho  ft  Albuquerque/EGftG) 

—indata 1 lists  disco  analysis  clean 


le>l. 


binary 

'eting  data  points 


Deletions  complete. 
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1 ists 
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text  I 
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analysis 


clean 


i-text 
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add-ndata 

del-ndata 
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lists 
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analysis 
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clean 
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1 
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1 
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text 
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lists 


disco 


rcont- 


analysis  clean 
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Section  5.9  - File  Input  of  New  Data  using  option  indata 

In  Sections  5.5  through  5.8,  we  learned  to  invoke  the  option  "indata"  to  input  new  data 
by  keyboard,  and  to  review,  revise,  and  delete  old  data  from  a non-empty  database. 

In  this  section,  we  shall  learn  how  a DOE  user  can  input  new  data  by  making  the 
computer  read  a pre-formatted  3-column  data  file  as  diseased  on  page  32.  More  specifically, 
the  format  of  the  3-column  data  file  consists  of  a 19-character- wide  Column  1 (X  for  quarter- 
year-table-city-contractor-facility  label),  followed  by  a 4-character-wide  Column  2 (Y  for  PI 
number),  and  a 20-character- wide  Column  3 (Z  for  PI  value).  There  is  a one-character-separator 
between  each  of  the  two  neighboring  columns.  An  example  of  the  DOE-specific  data  file  format 
is  given  on  page  49  where  the  filename  is  F3 1-9 1-1. 

The  following  is  a sequence  of  steps  for  a DOE-user  to  input  new  data  from  a file  by  first 
opening  a submenu  from  the  option  "indata"  as  described  on  pp.  72-73: 

Step  1 For  the  submenu  under  "indata"  with  two  options,  "text"  and  "binary", 

choose  "text"  by  hitting  the  carriage-return  again. 

Step  2 For  the  submenu  with  3 options,  "old-ndata",  "add-ndata",  and  "del- 

ndata",  use  the  space-bar  to  position  cursor  on  the  option  "new-ndata",  and 
then  hit  carriage-return  to  display  a submenu  named  "keybd  or  file". 

Step  3 Use  the  space-bar  to  choose  the  option  "file"  and  hit  carriage-return.  At 

this  point,  go  to  page  58  (bottom  figure)  to  see  a menu  of  facilities. 

Step  4 Use  space-bar  to  select  the  facility  and  hit  carriage-return  to  display 

another  menu  with  choices  on  the  year  and  quarter  of  the  database. 

Step  5 Use  space-bar  to  select  the  year  and  quarter  of  the  database.  Hit  carriage- 

return  to  open  the  database  for  the  specific  facility,  year  and  quarter. 

Step  6 On  page  73  top,  we  see  a window  menu  named  "reading  from  disc"  with 

a request  for  us  to  name  the  file  to  be  read.  The  filename  is  restricted  to 
no  longe  than  8 characters  and  without  the  extension  afte  rthe  period.  In 
our  example,  we  type  the  name  of  a data  file  as  f3 1-9 1-1. 

Step  7 On  page  73  bottom,  we  receive  a message  saying  that  the  data  from  file 

f31-91-l  for  the  database  FI,  year  1991,  quarter  1,  have  been  read  into 
the  database. 
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analysis  clean 
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text  I 
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old-ndata 
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del-ndata 


lists 


disco 


|-3.  IDAHO  (Idaho  8 Albuquerque/EG8G) 

I— indata 

text  I 
binary 


analysis 


clean 


-neu-data 

Do  you  uish  to  enter  a new  n-data  value  fron  the  keyboard, 


or  do  you  uish  to  read  data  fron  a file? 
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PDA  Menu  for  option  indata  - Continuation  Sheet 


p3.  IMHO  (Idaho  S Olbuquerque/EGIIG) 


i— iadata- 
text 
binary 


I 


lists 


disco  analysis  clean 


rreading  fron  disc- 


P lease  naae  file  to  read 


r3.  IMHO 

r~indata- 
b inary 


(Idaho  S Olbuquerque/EGftG) 


lists 


disco 


analysis 


clean 


-reading  fron  disc 

Data  fron  f 31-91-1  , for  FI 1991-1  haue  been  entered 

in  the  database:  3.  IDOHO  (Idaho  d Olhuquerque/EGdG) 
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Section  5.10  - List  Old  Data  using  option  lists 

Being  the  second  of  a five-option  menu,  "lists"  is  a very  simple  feature  where  the  only 
purpose  is  to  let  the  user  see  the  content  of  an  existing  database. 

As  shown  on  page  75,  a user  first  use  the  space  bar  to  position  the  cursor  on  the  option 
"lists"  and  then  hit  the  carriage-return  to  display  a menu  of  7 facility  labels,  F-1  through  F-7. 
For  application  3,  IDAHO  (Idaho  & Albuquerque/EG&G),  those  labels  denote  facilities  F31 
through  F37  as  carefully  deciphered  on  page  viii  of  this  report.  A similar  explanation  is  given 
on  page  58  (bottom  figure)  in  the  form  of  a window  menu  under  the  option  "indata".  For 
brevity,  a similar  display  under  the  option  "lists"  is  not  implemented. 

After  the  facility  label,  say,  FI,  is  selected,  hit  the  carriage-return  to  display  another 

submenu  with  8 year-quarter  options,  namely,  FI DEMO-1  through  FI DEMO-4, 

and  FI 1991-1  through  FI 1991-4.  Use  space-bar  to  select  a year-quarter  option, 

say,  FI 1991-1,  and  hit  carriage-return.  A listing  of  the  complete  database  for  facility 

FI,  year  1991,  quarter  1,  is  displayed  as  shown  on  page  76. 

A similar  exercise  to  list  the  database  for  facility  FI,  year  1991,  quarter  2 is  given  on 
pp.  77-78. 

When  the  user  is  satisfied  with  the  review  of  the  content  of  a specific  database,  a 
carriage-return  wiU  end  the  listing  exercise. 
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disco  analysis 


clean 
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F-6 
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PDA  Menu  for  option  lists  - Continuation  Sheet 
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indata 
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18 

FI 

1991-2 

1 

91 

2 

ID 

EGftG 

AflCF 

4200 

0.0000000600 

19 

FI 

1991-2 

1 

91 

2 

ID 

EGftG 

AflCF 

4300 

3.0000000000 

20 

FI 

1991-2 

1 

91 

2 

ID 

EGftG 

A1CF 

4420 

11.6000000000 

21 

FI 

1991-2 

1 

91 

2 

ID 

EGftG 

AflCF 

4430 

18.0000900000 

22 

FI 

1991-2 

1 

91 

2 

ID 

EGftG 

AflCF 

4520 

0.9000000000 

23 

FI 

1991-2 

1 

91 

2 

ID 

EGftG 

AflCF 

4530 

0.0000800000 

24 

FI 

1991-2 

1 

91 

2 

ID 

EGftG 

AHCF 

4600 

0.8000000000 

25 

FI 

1991-2 

1 

91 

2 

ID 

EGftG 

AflCF 

4711 

0.0000000060 

26 

FI 

1991-2 

1 

91 

2 

ID 

EGftG 

A1CF 

4712 

0.0000000000 

27 

FI 

1991-2 

1 

91 

2 

ID 

EGftG 

AflCF 

4713 

0.0000800000 

28 

FI 

1991-2 

1 

91 

2 

ID 

EGftG 

AfKF 

4721 

0.0000006000 

29 

Fl__ 

Kibserv 

1991-2 

at  ions 

1 

91 

2 

ID 

EGftG 

AflCF 

4722 

0.0000000090 

30 

FI 

1991-2 

1 91  2 

ID  EGftG  AIKF 

4723 

0.0000800000 

31 

FI 

1991-2 

1 91  2 

ID  EGftG  AHCF 

4731 

0.0000800000 

32 

Pl__ 

1991-2 

1 91  2 

ID  EGftG  AUCF 

4732 

0.0000000000 

33 

FI 

1991-2 

1 91  2 

ID  EGftG  AHCF 

4733 

0.0000000600 

34 
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Section  5.11  - Save  Data  as  DOS  File  using  option  disco 

In  Sections  5.5  through  5.9,  we  learned  how  to  create  and  review  the  content  of  a 
database  using  the  option  "indata".  In  Section  5.10,  we  learned  how  to  list  the  content  of  a 
database  using  the  option  "lists".  In  the  next  three  sections,  we  shall  learn  how  to  save  the 
content  of  a database  either  as  a DOS  file  or  a DATAPLOT  file  using  the  option  "disco". 

To  save  the  content  of  a database  as  a DOS  file,  we  follow  a sequence  of  steps  as  shown 
on  pp.  80-82  and  described  below: 

Step  1 Position  cursor  at  the  option  "disco"  and  hit  carriage-return. 

Step  2 For  the  submenu  under  "disco"  with  five  options,  the  first  one,  "op_sys", 

is  for  a temporary  access  to  DOS  as  explained  in  Section  5.3,  and  the 
second,  "splitfl_x",  is  for  the  partitioning  of  a DOE  file  as  explained  in 
Section  5.4.  The  remaining  three,  "sav_dosfl",  "sav_dpdat",  and 
"r_dpdat_y",  are  the  subjects  of  this  section.  Section  5.12,  and  Section 
5.13,  respectively.  So  for  this  step,  we  shall  position  the  cursor  at  the 
option  "sav_dosfl"  and  hit  carriage-return.  A window  menu  of  7 facility 
labels  is  displayed. 

Step  3 Use  space-bar  to  select  one  of  seven  facility  labels,  F-1  through  F-7.  As 

explained  in  Section  5.10,  for  application  3.  IDAHO,  those  labels 
correspond  to  facilities  F31  through  F37  as  defined  on  page  viii  of  this 
report.  After  a facility  label  is  selected,  hit  carriage-return  to  display  a 
second  window-menu  consisting  of  a label  for  facility,  year,  and  quarter. 

Step  4 Use  space-bar  to  select  a facility-year-quarter  label  and  hit  carriage-return. 

A chart  asking  a user  to  enter  the  name  of  a DOS  file  to  receive  all 
information  in  the  pre-selected  database  is  displayed  on  page  81  (bottom 
figure).  Read  the  instruction  on  the  filename  specificiation,  type  in  a 
filename  as  directed,  and  hit  carriage  return. 

Step  5 After  the  content  of  a database  is  saved  on  a DOS  file,  a message  appears 

(see  page  82)  confirming  that  data  have  been  recorded  on  a file  previously 
named. 

To  check  whether  the  content  of  the  database  is  actually  saved  as  a DOS  file,  use  space-bar  to 
position  cursor  on  the  option  "op_sys"  and  hit  carriage  return.  A temporary  exit  to  DOS  allows 
a user  to  use  the  TYPE  command  to  see  the  newly-created  file  (see  page  83). 
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PDA  Menu  for  option  disco 


3.  ID()H0 
indata 


(Idaho  S A 1 buquerque/EMG ) 


lists 


analysis 


clean 


1-3.  IDAHO  (Idaho  S 
indata  lists 


Albuquerque/EGSG) 

f-disco [analysis 


- 1 - 
op  sys 
- 2 - 
splitf l_x 
- 3 - 


- A - 

saM_dpdat 

r_dpdat_y 


clean 


3.  IDAHO 
indata 


(Idaho  S Albuquerque/EGSG) 


lists 


r-disco- 


analysis 


op_sys 
- 2 - 


DOE  Facility  


F-1 


F-2 

F-3 

FH 

F-5 

F-6 

F-7 


plitf l_x 

- 3 - 
au_dosf I| 

- A - 
aM_dpdat 
_dpdat_y 


clean 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


r3.  IDAHO 
indaita 


(Idaho  ft  Albuquerque/EGftG) 


lists 


t— disco- 


- 1 - 
op_sys 
- 2 - 


analysis 


clean 


splitfp  Facility Vear-Qtr 


saM_do 

saM_dp 

r_dpda 


FI 

FI 

FI 

FI 


DEHO-1 

DEHO-Z 

DEHO-3 

DEHO--! 


FI 1S91-2 

FI 1991-3 

FI  1991-9 


r3.  IDAHO  (Idaho  ft  Albuquerque/EGftG) 


indata 


lists 


r-disco- 


- 1 - 
op  sys 
- 2 - 


analysis  clean 


rchart 

Please  enter  nate  of  file  to  receive  all  inforiatlon 
including  data  in  category  FI 1991-1 


(Filenane  not  to  exceed  8 characters  and 
nust  begin  uith  an  alphabet.) 


F31_911X| 
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PDA  Menu  for  option  disco  - Continuation  Sheet 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


spl itf l_x 

- 3 - 

SftM_d0Sf 1 

- i - 
sau_dpdat 
r_dpdat_y 


-retrn 

Type  exit  <enter>  to  return  to  progran 
Then  press  <escape> 


DR  DOS  Release  5.0 

Copyright  (c)  1976,1982,1988,1330  Digital  Research  Inc.  All  rights  reserued. 
Ariaa  Coaputer  Corporation 

A:\>  type  F31_911X  IHORE 


ri_ 

1991-1 

1 

91 

1 

ID 

EGdG 

AfICF 

1190 

8.0000000000 

1 

n 

1991-1 

1 

91 

1 

ID 

EGdG 

AHCF 

1200 

0.0000000000 

2 

ri 

1991-1 

1 

91 

1 

ID 

EGdG 

AnCF 

1300 

0.0009000000 

3 

ri 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

1400 

0.0000000000 

4 

ri 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

1520 

0.0000000000 

5 

ri 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

1530 

1820.0000000000 

6 

ri 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

1620 

0.0000000000 

7 

ri_ 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

2100 

0.0000000000 

8 

ri 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

2200 

0.0000000000 

9 

ri 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

2300 

1.0000000000 

10 

Fl_ 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

2400 

38.0000000000 

11 

FI 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

2500 

0.0000000000 

12 

FI 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

2600 

1.0000000000 

13 

ri 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

3110 

0.0000000000 

14 

FI 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

3120 

0.0000000000 

15 

ri 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

3210 

0.0000000000 

16 

FI 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

3220 

0.0000000000 

17 

FI 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

4100 

0.0000000000 

18 

FI 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

4200 

0.0000000000 

19 

FI 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

4300 

4.0000000000 

20 

ri 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

4420 

10.0000000000 

21 

ri 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

4430 

14.0000000000 

22 

FI 

1991-1 

1 

91 

1 

ID 

EGAG 

AHCF 

4520 

1.0000000600 

23 

Strike  a key  uhen  ready  . 
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Section  5.12  - Save  Data  as  DATAPLOT  File  using  option  disco 

The  file-saving  exercise  of  the  last  section  converts  a 3-column-formatted  file  into  a 5- 
column  DOS  file  in  drive  "a",  where  the  extra  two  columns  are  the  database  identifier  and  the 
data  point  indentifier  as  illustrated  on  page  83.  For  analysis  and  graphics  purposes  using  a 
public-domain  software  package  named  DATAPLOT,  we  need  to  save  the  3-column  data  in  a 
variety  of  formats  in  drive  "c"  under  the  subdirectory  c;\DATAPLOT.  In  particular,  we  have 
designed  this  feature  to  allow  a user  of  a DATAPLOT  macro  to  save  input  data  on  a file  with 
generic  names  such  as  DOE_lCOL.DAT,  DOE_3COL.DAT,  etc. 

To  accomplish  this,  we  follow  a sequence  of  steps  as  shown  below  and  on  pp.  85-91: 

Step  1 Position  cursor  at  the  option  "disco"  and  hit  carriage-return. 

Step  2 Position  cursor  at  the  option  "sav_dpdat"  and  hit  carriage-return. 

Step  3 Use  space-bar  to  select  a facility  label  from  the  window  menu  named 

"facility"  (see  page  85,  bottom),  and  hit  carriage-return. 

Step  4 Use  space-bar  to  select  a facility-year-quarter  label  from  the  next  window 

menu  (see  page  86,  top),  and  hit  carriage-return.  At  this  point,  a menu 
is  displayed  requesting  a user  to  choose  the  name  of  a file  from  five 
options,  namely,  DAT_FILE,  DOE_lCOL,  DOE_2CLA,  DOE_2CLB,  and 
DOE_3COL. 

Step  5 Follow  the  instructions  (see  page  86,  bottom)  and  hit  carriage-return  after 

a particular  option  is  selected. 

Step  6 If  the  option  "DAT_FILE"  is  selected,  a user-specified  filename  must  be 

entered  (see  page  87,  top).  If  a file  by  the  same  filename  already  exists 
in  the  subdirectory  c:\DATAPLOT,  a warning  sign  is  posted  as  shown  on 
page  87  (bottom  figure).  If  the  warning  sign  is  ignored,  a message  will 
appear  (see  page  88)  indicating  that  data  have  been  saved  on  a file  by  the 
user-specified  name  plus  the  three-character  extension  DAT.  This 
facilitates  a direct  link  with  a DATAPLOT  macro  because  DATAPLOT 
requires  the  name  of  a file  to  be  read  to  have  the  .DAT  extension. 

To  verify  that  the  DATAPLOT  file  is  correctly  generated,  use  the  temporary  access  to  DOS 
(Section  5.3)  to  check  (see  page  89).  An  example  of  selecting  a pre-assigned  filename,  say, 
DOE_2CLB.DAT  is  given  in  pp.  90-91. 


84  - 


Fong.  Bemslem  & Filliben  (1992)  on  'PDA;  A PC-bas«d  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Dau" 


PDA  Menu  for  option  disco 


r3.  IDAHO 
indata 


(Idaho  S Albuquerque/EGIIG) 


1 ists 


t— disco- 


- 1 - 
op_sys 
- 2 - 


analysis 


splitf l_x 

- 3 - 
sau_dosf I 

- 4 - 


sau  dpdat 


r_dpdat_y 


clean 


3.  IDAHO 
indata 


(Idaho  II  Albuquerque/EGSG) 


lists 


r-disco- 


I-  Facility 


F-2 

F-3 

F-4 

F-5 

F-6 

F-7 


- 1 - 


analysis  clean 


op_sys 
- 2 - 

Heaning  of  Facility  Designation 

F-1I3]  AHCF  (Adu  React  Heas  Fac  ft  Coupled  Fast  RHF) 
F-2I3]  ATR  (Aduanced  Test  Reactor) 

F-3[31  CONT  (Contractor) 

F-4I31  HDSO  (Alpha  Fuels  Fac  - Hound  Plant/Bldg  50) 
F-5 [31  IRHC  (lest  Reactor  Hot  Cell  facility) 

F-6I31 

F-7I31 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


r3.  IDf)H0 
indata 


(Idaho  S ()lbuquerque/EGftG) 


1 ists 


r-disco- 


- 1 - 
op_sys 
- I - 


analysis 


clean 


mean  in 

p Facility  Year-IJtr 

n 

F-1I3]  AfIC 

FI  DEHO-l 

Coupled  Fast  RHF) 

F-2I3]  ATfi 

FI  DENO-Z 

) 

F-3131  CON 

FI  DEnO-3 

F-dI31  NDS 

FI DEHO-d 

nd  Plant/Bldg  50) 

F-513]  TRH 

F-6131 

F-7I3] 

FI  1S91-Z 

FI 1991-3 

FI 1991-d 

Facility) 

3.  ID()H0  (Idaho  S Albuquerque/EGSG) 


indata 


lists  t—disco 


- 1 - 


op_sys 
- Z 


analysis  clean 


rchart- 


P lease  choose  D()T_FILE  if  you  wish  to  nane  a file 
for  storing  Y and  Z data  fro*  a 3-col unn  X-Y-Z 
input  filcJ  or  select  other  file  na*e  fron  aenu. 

-Explanation  of  dp  file  nanes — 

Z-colu*n  Y and  Z data.  Fllenane  by  user. 


One  column,  Z,  of  numbers 
Tuo  columns,  Y and  Z,  of  nuabers 
Tuo  columns;  X of  ASCII,  Z of  numbers 
Three  coluans,  X,  V,  Z,  of  numbers 


|—dp  name 


DHTJILE 


DOE.ICOL 
DOEJCLA 
DOE  ZCLB 
DOE  3C0L 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


r3.  IDAHO 
indata 


(Idaho  S Albuquerque/EGSG) 


1 ists 


r-disco- 


- 1 


analysis 


clean 


op  sys 
- 2 - 

<:hart 

Please  enter  na«e  of  file  to  receive  Y 8 Z data  In 
a Z-colimn  format  for  category  FI 19S1-1 

(Filenaae  not  to  exceed  B characters 
and  nust  begin  uith  an  alphabet.) 

D0E_2CLA| 


r3.  IDAHO  (Idaho  S Albuquerque/EGSG) 


indata 


1 ists 


r-<iisco- 


- 1 - 
op_sys 
- 2 - 


rchart- 


analysis  clean 


Please  enter  naae  of  file  to  receive  ¥82  data  In 
a 2-colunn  foriat  for  category  FI 1991-1 

(Filenaae  not  to  exceed  B characters 
and  nust  begin  uith  an  alphabet.) 

DOE.ZCLA 

File  C: SDArAPL0TsD0E_2CLA.DAT  already  exists 
Overwrite? 
r-continue— 


no 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


1-3.  !Df)H0  (Idaho  S (ilbuquerque/EGHG) 


indata 


lists 


rchart- 


a Z-coltt 

(Filenaae 
and  nust 

DOE  2CL0 


i—disco 

- 1 - 
op  sys 
- 2 - 
spl itf l_x 

- 3 - 
sau_dosf 1 

- A - 


r_dpdat_y 


analysis  clean 


category  FI _1991-1 

d 8 characters 
n alphabet.) 


File  C:sDftIAPL0TsD0E_2CLft.D0T  already  exists 
Otierurite? 

Data  recorded  on  "CADATAPLOTsDOE  ZCLA.DAT" 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


DR  DOS  Release  5.0 

Copyright  (c)  1376,1982.1988,1990  Digital  Research  Inc.  All  rights  reserued. 
Ariaa  Coaputer  Corporation 


A:\>  TYPE  C:\DATAPL0T\D0E_2CLA.DAI 


iiee.oeeooeeooe 

izee.oeeooeeooe 

1300.0000000006 

1400.0000000000 

1520.0000000000 
1530.0600000000 

1620.0000000000 

2100.0000000000 

2200.0000000000 

2300.0000000000 

2400.0000000000 

2500.0000000000 

2600.0000000000 

3110.0000000000 

3120.0000000000 

3210.0000000000 

3220.0000000000 

4100.0000000000 

4200.0000000000 

4300.0000000000 

4420.0000000000 

4430.0000000000 

4520.0000000000 
Strike  a key  uhen  ready  . 


0.0000000000 

0.0000600000 

0.0000000000 

0.0000000000 

0.0000000000 

1820.0000000000 

0.0000000000 

0.0000000000 

0.0000000000 

1.0000000000 

38.0000000000 
0.0000000000 
1.0000600000 
0.0000000000 
0.0000000000 
0.0000000000 
0.0000600000 
0.0000000000 
0.0000000000 

4.0000000000 

10.0000000000 
14.0000000000 

1.0000000000 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


r3.  IDAHO  (Idaho  5 Albuquerque/EGSG) 


indata 


lists 


i—disco 

- 1 - 
op_sys 
- 2 - 


analysis  clean 


rchart 


Please  choose  DAT_FIL£  if  you  wish  to  nane  a file 
for  storing  Y and  Z data  frow  a 3-col unn  X-Y-Z 
input  file;  or  select  other  file  naac  front  aenu. 


p-dp  nante 

DAI  FILE 


■Explanation  of  dp  file  nanes- 


DOE.ICOL 
DOE  2CLA 


DOE  2CLB 


DOE  3C0L 


Z-coluan  Y and  Z data.  Fllenane  by  user. 

One  colunn,  1,  of  nunhers 
Two  colunnsi  Y and  Z,  of  nuabers 
Two  columns:  X of  ASCII.  Z of  numbers 
Three  columns,  X.  Y,  Z.  of  numbers 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


splitf l_x 

- 3 - 
saw_dosf 1 

- A - 
sau_dpdat 
r_dpdat_y 


-retrn 

Type  exit  <enter>  to  return  to  program 
Then  press  <escape> 


DR  DOS  Release  5.0 

Copyright  (c)  1976,1982,1988,1930  Digital  Research  Inc.  All  rights  reserved. 
Arina  Conputer  Corporation 

A:\>  TTPE  C:\DATAPL0TSD0E_2C1B.DAT  IHORE 


1 

91 

1 

ID 

EGdG 

AHCF 

0.9000000000 

1 

91 

1 

ID 

EGdG 

AnCF 

0.0000000000 

1 

91 

1 

ID 

EGdG 

AnCF 

0.0000000000 

1 

91 

1 

ID 

EGdG 

AHCF 

0.0000000000 

1 

91 

1 

ID 

EGdG 

AtlCF 

0.0000000000 

1 

91 

1 

ID 

EGdG 

AHCF 

IBZO. 0000000000 

1 

91 

1 

ID 

EGdG 

AHCF 

0.0000000000 

1 

91 

1 

ID 

EGdG 

AHCF 

0.0000000000 

1 

91 

1 

ID 

EGdG 

AHCF 

0.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

1.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

38.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

0.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

1.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

0.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

0.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

0.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

0.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

0.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

0.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

d. 0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

10.0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

Id. 0000000000 

1 

91 

1 

ID 

EGAG 

AHCF 

1.0000000000 

Strike  a key  uhen  ready  . 
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Section  5.13  - Retrieve  Data  & Save  as  DATAPLOT  File  using  option  disco 

The  file-saving  exercise  of  the  last  section  is  designed  to  retrieve  the  content  of  a single  it 

database  (facility-year-quarter)  in  a one-column  (Z),  two-column  (X-Z  or  Y-Z),  or  three-column  ! 

(X-Y-Z)  format,  where  column  Y lists  all  the  Performance  Indicator  (P.I.)  Nos.  of  interest  to  ij 

a DOE  user. 

t' 

Since  one  of  the  key  objectives  of  the  DOE  Program  is  to  analyze  the  P.I.  data  by  : 

keeping  track  of  each  individual  P.I.  over,  say,  ten  to  twelve  quarters,  it  is  desirable  for  a user  ! 

to  be  able  to  retrieve  all  of  the  values  of  a single  P.I.  in  a single  or  a group  of  facilities  operated  1 

by  a single  contractor.  For  Phase- 1 implementation  of  the  expert  system  PDA,  we  included  this  j 

retrieval  capability  for  a single  P.I.,  but  we  limit  our  design  to  a single  facility  as  a test  case 
against  possible  memory  overflow.  As  we  gain  experience  with  the  Phase- 1 system  using  more  j 
data  from  DOE  as  test  cases,  we  shall  s(X)n  find  out  whether  it  is  feasible  to  extend  the  retrieval 
capability  to  a group  of  facilities. 

To  learn  how  the  P.I.  data  from  more  than  one  database  (facility-year-quarter)  are 
retrieved  and  saved  in  a DATAPLOT  file,  we  follow  a sequence  of  steps  as  described  below  and 
on  pp.  93-94: 

Step  1 Position  cursor  at  option  "r_dpdat_y"  in  submenu  named  "disco".  | 

Step  2 Hit  carriage-return  to  display  a menu  of  y-values  (P.I.  Nos.).  Use  space- 

bar to  select  the  P.I.  No.,  and  hit  carriage-return  to  display  a chart 
requesting  the  user  to  furnish  a filename  to  store  the  retrieved  information. 

Step  3 Follow  the  instructions  on  the  menu  (page  94,  top),  type  in  a file  name, 

followed  by  a carriage- return.  If  there  is  no  conflict  with  existing 
filenames,  a message  will  appear  indicating  that  the  retrieved  information 
has  been  stored  as  a DATAPLOT  file  in  the  subdirectory  c:\DATAPLOT. 

To  verify  that  the  DATAPLOT  file  indeed  contains  all  of  the  data  pertaining  to  a single  P.I., 
use  the  temporary  access  to  DOS  (Section  5.3)  to  check.  The  example  shown  on  page  95 
indicates  that  the  values  of  the  P.I.  No.  4420  for  the  first  and  second  quarters  of  1991  can  be 
retrieved  for  trending  analysis  using  DATAPLOT  or  other  statistical  analysis  packages. 
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Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data" 


PDA  Menu  for  option  disco 


r3.  I IMHO  (Idaho  S 
indata  lists 


Olbuquerque/EGSG) 

(—disco [analysis 


- 1 - 
op_sys 

- 2 - 
splitf l_x 

- 3 - 
sau_dosf I 

- A - 
sau_dpdat 


clean 


3.  IDOHO  (Idaho  S Olbuquerque/EGIIG) 
indata  lists  r-disco (analysis 


1 


op_sys 


clean 


1520 

1608 

1712 

1721 

1723 

1732 


1200 

1160 

1530 

2100 

2300 

2500 

3110 

3210 

1180 

1300 

1130 

1530 

1711 

1713 

1722 

1731 

1733 


ing  of  Facility  Designation 

tier  (Odu  React  Heas  Fac  ft  Coupled  Fast  RHF) 
(Oduanced  Test  Reactor) 

(Contractor) 

(Alpha  Fuels  Fac  - Hound  Plant/Bldg  50) 


TR 

ONT 

D50 

RHC 


(Test  Reactor  Hot  Cell  Facility) 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


r3.  IDf^HO 
indata 


(Idaho  ft  (Ilbuquerque/EGftG) 


lists 


I— disco- 


- 1 - 


op_sys 
- 2 


analysis 


clean 


^hart 

Please  enter  naie  of  file  to  recelue 
y data  for  F-1 


(Filcnaee  not  to  exceed  0 characters 
and  nust  begin  uith  an  alphabet.) 


F31-4420| 


3.  IDAHO  (Idaho  ft  Albuquerque/EGftG)  — 

indata  lists  r-disco lanalysis  clean 


rchart- 


Please  en 
y data  fo 

(Filenaie 
and  nust 

F31-4420 


- 1 - 
op_sys 

- 2 - 
splitfl.x 

- 3 - 
sau_dosf 1 

- 4 - 
san_dpdat 


lie  to  receive 


d 8 characters 
n alphabet.) 


File  C: SDATAPLOTSF31-44Z0.DAT  written  to  disk 
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PDA  Menu  for  option  disco  - Continuation  Sheet 


splitfl  X 

- 3 - 
saM_dosf 1 

- 4 - 

sau_dpdat 

r_dpdat_y 

Type  exit  <enter>  to  return  to  program 

Then  press  <escape> 

DR  DOS  Release  5.0 

Copyright  (c)  1976,1982,1988,1330  Digital  Research  Inc.  All  rights  reserued. 
Ariaa  Conputer  Corporation 


A:\>  TYPE  C:\DATAPLOT\F31-4420.DAI 


ri  1991-1  1 91  1 II  EG«G  AUCF  4420 

ri 1991-2  1 91  2 II  EGAS  AflCF  4420 


10.0000000000  21 

11.0000000000  21 


A:v> 
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Section  5.14  - Analysis  of  Data  using  option  analysis 


At  this  point,  we  have  completed  all  the  necessary  tutorials  for  data  input  and  file 
management  such  that  we  can  begin  the  access  to  the  powerful  analysis  package  named 
DATAPLOT.  Let  us  review  what  we  have  accomplished  so  far  in  getting  ready  for 
DATAPLOT.  In  Section  5.4,  we  learned  how  to  partition  a DOE  data  file  into  smaller  pieces 
where  the  first  of  a 3-column  data  file  is  identical.  In  Section  5.11,  we  learned  how  to  save  a 
3-column  data  file  as  a 5-column  DOS  file  where  two  extra  columns  were  added  to  provide 
system-generated  identification  for  each  row  of  data.  In  Section  5.12,  we  learned  how  to 
selectively  save  from  a 3-column,  X-Y-Z  data  file  into  one  of  following  five  DATAPLOT  files: 


Original  File 

3-column  data, 
X,  Y,  Z. 

3-column  data, 
X,  Y,  Z. 


Saved  File 

1 - column  data, 
Z. 

2- column  data, 
Y,  Z. 


Filename 

DOE_lCOL.DAT 

DOE_2CLA.DAT 

or, 

< Any  8-character 
filename  > plus 
extension  .DAT 


3-column  data, 
X (ascii),  Y,  Z. 

3-column  data, 
X,  Y,  Z. 


2- column  data, 
X (ascii),  Z. 

3- column  data, 
X,  Y,  Z. 


DOE_2CLB.DAT 

DOE_3COL.DAT 


In  Section  5.13,  we  learned  how  to  retrieve  data  from  files  belonging  to  different  quarters 
(identified  by  X-value)  but  having  the  same  PI  number  (identified  by  Y-value)  such  that  we  can 
track  the  variation  of  the  PI  values  (identified  by  Z-value)  over  all  quarters  where  data  exist. 
Finally,  it  is  important  to  emphasize  that  all  files  saved  in  this  manner  are  stored  in  the 
subdirectory  C:\DATAPLOT  for  processing  after  we  activate  the  option  "analysis"  in  the  5- 
option  window  named  "3.  IDAHO  (Idaho  & Albuquerque/EG&G)". 
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PDA  Menu  for  option  analysis 


-3.  IDAHO  (Idaho  8 Albuquerque/EG8G^^^^^ 
indata  lists  disco  clean 


3.  IDAHO  (Idaho  5 Albuquerque/EGSG)  — 

indata  lists  disco  i— analysis — iclean 


- 1 - 


ATflfLOT 


- 2 - 
Histograa 
Pie-Chart 
Pareto-Ch 
P1D-411-7F 
ZDPlotFit 

- 3 - 
C-Chart 
P-Chart 

- 4 - 
Lag-Plot 
AutocorrP 
Predict-1 
Predict-2 

- 5 - 
Tests 

-6- 

Distribut 
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As  shown  on  page  97,  when  we  move  the  cursor  to  the  option  "analysis  and  hit  the 
Carriage-Return,  we  activate  a window  with  six  subgroups  of  options  as  shown  below: 


Option 


Remarks 


Subgroup  1 DATAPLOT  This  option  activates  an  interactive  data  analysis  code 

named  DATAPLOT.  The  user  may  type  in  any 
DATAPLOT  commands  as  described  in  Appendix  C 
and  execute  in  the  interactive  mode. 


Subgroup  2 Histogram 
Pie-Chart 
Pareto-Ch 

PID-4Q-7F 

2DPlotFit 


See  Section  6. 1 for  a tutorial  on  this  option. 

See  Section  6.2  for  a tutorial  on  this  option. 

This  option  fulfills  one  of  3 DOE  chart  requirements  as 
specified  in  [2].  See  Section  6.3  for  a tutorial. 

This  option  was  designed  for  a set  of  sample  PI  data 

given  by  DOE  [161  for  tutorial  purposes.  See  Sect.  6.4. 

This  Y-vs.-X  plot  and  linear  fit  option  is  motivated  by  a 
round  robin  fatigue  crack  growth  rate  test  program  [8]. 
See  Section  6.5. 


Subgroup  3 C-Chart  This  option  fulfills  one  of  3 DOE  chart  requirements  as 

specified  in  [2].  See  Section  6.6  for  a tutorial. 
P-Chart  This  option  fulfills  one  of  3 DOE  chart  requirements  as 

specified  in  [2],  See  Section  6.7  for  a tutorial. 


Subgroup  4 Lag-Plot 
AutocorrP 
Predict- 1 


Predict-2 


See  Section  6.8  for  a tutorial  on  this  option. 

See  Section  6.9  for  a tutorial  on  this  option. 

This  option  was  motivated  by  the  option  on  P-Chart  where 
a simple  model  (type  1)  was  used  to  predict  a future 
data  using  results  of  a lag  plot  and  autocorr.  plot 
of  past  information.  See  Section  6.10  for  a tutorial. 

This  option  was  similarly  motivated  as  Predict- 1 except 
that  a different  model  (type  2)  was  used  when  the  lag 
plot  and  autocorr.  plot  results  exceed  a certain 
threshold  value.  See  Section  6.11  for  a tutorial. 


Subgroup  5 Tests  This  option  is  further  divided  into  five  sub-classes  of 

(more  on  options  (total  12)  as  shown  on  page  99.  See  Sections 

page  99)  6.12  and  6.13  for  tutorials  on  7 of  the  12  options. 


Subgroup  6 Distribut  This  option  is  also  divided  into  two  sub-classes  of  options 
(more  on  (total  17)  as  shown  on  page  100.  See  Section  6.14  for 

page  100)  a tutorial  on  2 of  the  17  options. 
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PDA  Menu  for  option  analysis  / Tests 


[-3.  IDAHO 
indata 


(Idaho  S Albuquerque/EGSG) 


1 ists 


disco 


panalysis — 


clean 


" 1 ” 

DAIAPLOI 

p Data  Analysis  ft  Tests  — 

- Z - 

Histograa 

5a.  Graphical  

Pie-Chart 

box_plot 

Pareto-Ch 

scatter_plot 

PID-4Q-7F 

5b,  Exploratory  

ZDPlotFit 

su«nary_four_plot 

- 3 - 

suMary  .tabulation 

C-Chart 

5c.  Test  for  Distrib.  — 

P-Chart 

Lanbda-test 

- <1  - 

Helbu 11-test 

Lag-Plot 

Extri_walue-test 

AutocorrP 

Box-Cox_transfritn 

Predict- 1 

5d.  Test  for  Location  — 

Predict-Z 

t-test 

- 5 - 

ANOUA 

Tests  1 

5e.  Test  for  Uariation  -- 

- 6 - 

Chi.squared-test 

Distribut 

F-test 
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PDA  Menu  for  option  analysis  / Distribut 


3.  IMHO 
indata 


(Idaho  S Olbuquerque/EGSG) 


1 ists 


disco 


[-analysis — 

- 1 - 
DftTflPLOT 

- I - 
Histograa 
Pie-Chart 
Pareto-Ch 
PID-4Q-7F 
ZDPlotFit 

- 3 - 
C-Chart 
P-Chart 

- 4 - 
Lag-Plot 
AutocorrP 
Predict- 1 
Predict-Z 

- 5 - 
lests 

- 6 - 

Distribut| 


clean 


b.  Probabillty_Plots  

Normal 

Uniforn 

Logistic 

Cauchy 

Lognorial 

Exponential 

Extreiiie_ualue_Iypel 


7 . Fami  ] i PR  nf  D i Rt.r  . — 


Tukey.laabda 
Students_t 
Chi_squared 
Gama 
Beta 
Ueibull 
Extrene.ua lue.TypeZ 
Binooial 
Geometric 
Poisson 
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Chapter  6 - Sample  Applications  using  option  analysis 

In  this  chapter,  we  shall  learn  to  perform  a variety  of  exploratory  data  analysis  tasks  by 
a single-stroke  execution  of  DATAPLOT  macros  written  for  users  who  know  nothing  about  the 
English-like  commands  of  DATAPLOT  but  are  interested  in  learning  about  them.  Of  the  14 
tutorials  in  this  chapter,  10  are  based  on  fictitious  data  that  are  motivated  by  DOE  PI  data 
analysis  requirements  as  specified  in  the  Guidance  Document  [2].  The  ten  tutorials  are: 


Section 

Ontion 

Datafile  Name 

Remark 

6.1 

Histogram 

DOE_lCOL.DAT 

12  Monthly  Data  for  PI  1.2  (Skin 
Contamination)  for  a particular 
year  reported.  Same  data  to  be 
used  for  generating  a C-Chart. 

6.2 

Pie-Chart 

DOE_2CLB.DAT 

Alternative  to  a Pareto  Distribution 

Chart  as  required  by  DOE  Guidance 
Document  [2].  Same  2-column  data 
with  X(ascii)  and  Y(no.  of  events)  to 
be  used  for  generating  a Pareto  Chart. 

6.3 

Pareto-Ch 

DOE_2CLB.DAT 

One  of  3 charts  required  by  DOE.  The 
fictitious  data  used  here  follow  an 
example  used  in  [2],  p.  A3-11. 

6.4 

PID-4Q-7F 

DOE_3COL.DAT 

This  is  not  one  of  the  required  charts, 
but  is  introduced  to  represent  a set 
of  sample  data  furnished  by  DOE  [16]. 

6.6 

C-Chart 

DOE_2CLA.DAT 

1 of  3 required  charts.  Data  on  PI  1.2. 

6.7 

P-Chart 

DOE_3COL.DAT 

1 of  3 required  charts.  Data  on  PI  4.4. 

6.8 

Lag-Plot 

DOE_lCOL.DAT 

Data  of  PI  4.4  in  percentages  are  used. 

6.9 

AutocorrP 

DOE_lCOL.DAT 

Data  of  PI  4.4  in  percentages  are  used. 

6.10 

Predict- 1 

DOE_3COL.DAT 

Same  data  of  PI  4.4  for  P-Chart  are  used 
to  predict  using  model  type  1. 

6.11 

Predict-2 

DOE_3COL.DAT 

Fictitious  data  used  for  model  type  2. 

To  introduce  the  subject  of  exploratory  data  analysis,  we  added  four  more  tutorials,  Sections 
6.5,  6.12,  6.13,  and  6.14,  using  fatigue  crack  growth  test  data  reported  by  six  laboratories  in 
a 1974  round  robin  program  sponsored  by  the  Society  of  Automotive  Engineers  [8]. 
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Sect.  6.1  - Histogram  (Data  File:  DOE_1COL.DAT) 

The  purpose  of  this  tutorial  is  to  learn  the  meanings  of  all  the  English-like  commands 
introduced  by  a DATAPLOT  macro  named  "DOEHISTO.DP".  To  facilitate  ease  of  references, 
we  shall  list  all  of  the  new  commands  used  in  the  macro  DOEHISTO.DP  according  to  the  15 
categories  used  in  Appendix  C to  define  all  of  the  DATAPLOT  commands.  For  the  first  of  a 
series  of  DATAPLOT  tutorials,  24  commands  were  used  as  listed  below  and  on  page  252: 


Category 

Pages 

Command 

Graphics 

223-226 

...HISTOGRAM  (default  to  count  vs.  value) 

Word  Chart/Schematics 

227-228 

Analysis 

229 

LET 

Plot  Control 

230-232 

BAR  CHARACTER  ...LABEL  LEGEND 

...LIMITS  TIC  TITLE  WINDOW 

Graphics  Output  Device 

232 

DEVICE 

Input/Output 

233 

READ 

Support 

234-236 

CLASS  DEFINE  DIMENSION  EXIT 

FEEDBACK  PAUSE 

Reserved  Words 

236-237 

LET  Subcommands 

238-241 

MEAN  NUMBER  STANDARD  DEVIATION 

SET  Subcommands 

241 

Library  Functions 

242-243 

Characters  & Symbols 

244-246 

LC()  UC() 

CHARACTER,  LINES,  or 

FONT  Arguments 

247-248 

The  philosophy  here  is  to  introduce  gradually  the  English-like  commands  of  DATAPLOT  to  no 
more  than,  say,  90  commands  through  20  example-driven  macros  in  14  tutorials.  We  also 
organize  these  tutorials  in  a logical  sequence  beginning  with  presentation  graphics  and  moving 
to  exploratory,  exhaustive,  and  finally  to  confirmatory  data  analysis  as  envisioned  by  Tukey 
[20].  Readers  are  encouraged  to  write  their  own  macros  using  ours  as  classroom  examples. 
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Histogram  (Data  File:  DOE_lCOL.DAT) 


Subroutine  Name:  DOEHTSTO.DP  Ref.:  pda-dp. 2a 


Histogram 


No.  of  Reportable  Events 
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DATAPLOT  Code  - Continuation  Sheet 


DOEHISTO.DP  (version  92-03-31,  Fong  & Filliben,  Revision  3) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  DOE  1COL.DAT  Y 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A: DOE_HIST.DAT  Y 

LET  N = NUMBER  Y 

LET  YBAR  = MEAN  Y 

LET  SD  = STANDARD  DEVIATION  Y 


3.  COMPUTATION 


LET  BUPPER  = YBAR  + 6*SD 
LET  BLOWER  = YBAR  - 6*SD 

4.  TITLE  COMMANDS  

TITLE  HLCOISTOGRAM 
TITLE  SIZE  3.5 
TITLE  DISPLACEMENT  1.5 

5.  LEGEND  COMMANDS  --- 

LEGEND  1 NOTE:  FICTITIOUS  DATA  GENERATED  FOR  SOFTWARE  TUTORIAL  PURPOSES. 
LEGEND  2 REF.:  A:\DOEHISTO.DP  (J.  FONG,  NIST,  3-31-92) 

6.  GRAPHICS  COMMANDS  - 

CLASS  LOWER  BLOWER 
CLASS  UPPER  BUPPER 
CLASS  WIDTH  0.3*SD 


BAR 

ON 

BAR 

WIDTH  1 

BAR 

FILL  ON 

BAR 

BAR 

PATTERN 

BAR 

BAR 

BAR 

FILL  OFF 
SOLID 

PATTERN  DU 
PATTERN  DD 
PATTERN  DUDD 


Note  1:  DU  denotes  diagonal  up; 

DD  denotes  diagonal  down; 

DUDD  denotes  cross-hatched  pattern. 


7.  LABEL  COMMANDS 

Y1  LABEL  FLCOREQUENCY 
Y1LABEL  SIZE  3 
YILABEL  DISPLACEMENT  5 


LET  FMAX  = 3 
YILIMITS  0 FMAX 

Note  2:  For  this  exercise,  maximun  frequency  FMAX  is  set  at  3. 
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DATAPLOT  Code  - Continuation  Sheet 


LET  YMIN  = 5 
LET  YMAX  = 35 
XLIMITS  YMIN  YMAX 

Note  3:  For  this  exercise,  XLIMITS  are  given  by  YMIN  and 

YMAX.  For  this  plot,  YMIN  = 5,  and  YMAX  = 35. 

XLABEL  NLCOO.  OF  UC()RLC( )EPORTABLE  UC( )ELC( )VENTS 
XLABEL  SIZE  3 

8.  PLOT  COMMANDS  

HISTOGRAM  Y 
LEGEND  ^ 

LEGEND  2 

9.  CLOSURE  COMMANDS  

PAUSE 

ER 

EXIT 

END  OF  DOEHISTO.DP  

Note  to  Reader:  The  following  is  a listing  of  the  data 

file  DOE_1COL.DAT,  which  is  also  stored 
. as  a backup  named  D0E_H1ST.DAT: 


20.0000000000 

19.0000000000 

28.0000000000 

18.0000000000 

25.0000000000 

25.0000000000 

14.0000000000 

20.0000000000 

16.0000000000 

22.0000000000 

24.0000000000 

17.0000000000 
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Sect.  6.2  - Pie  Chart  (Data  File:  DOE  2CLB.DAT) 

At  the  last  tutorial,  we  learned  how  to  code  a DATAPLOT  macro  using  24  different 
commands  to  plot  a one-column  file  of  numbers  as  a frequency- vs. -value  histogram  where  the 
maximum  frequency  was  set  through  a parameter  named  FMAX,  and  the  x-axis  limits  were  set 
through  YMIN  and  YMAX.  This  nomenclature  is  a little  confusing,  partly  because  it  is 
customary  in  plotting  histograms  to  refer  to  a column  of  numbers  as  Y rather  than  X. 

Clearly,  when  the  one-column  data  file  DOE_lCOL.DAT  changes,  so  should  the  values 
of  FMAX,  YMIN,  and  YMAX.  To  accomplish  this,  readers  need  to  use  an  editor  to  change 
the  macro  file  named  DOEHISTO.DP  by  editing  a few  lines  including  those  beginning  with  the 
commands  TITLE,  LEGEND,  YILABEL,  and  XLABEL. 

We  now  wish  to  introduce  the  second  tutorial  macro  named  DOEPIECH.DP.  We  need 
20  more  new  commands  to  code  this  macro  where  we  can  plot  a pie  chart  from  a 2-column  data 
file  with  the  first  column  contains  ASCII  characters  and  the  second,  numbers  as  shown  on  page 
110.  Agcun  by  category,  we  list  the  20  new  commands  below  and  on  page  252: 


Cateeorv 

Pages 

Command 

Graphics 

223-226 

PIE  CHART 

Word  Chart/Schematics 

Analysis 

227-228 

229 

HW  JUSTIFICATION  MARGIN 
TEXT  VERTICAL  SPACING 

MOVE 

Plot  Control 

Graphics  Output  Device 

230-232 

232 

PRE-ERASE 

Input/Output 

233 

COLUMN  LIMITS  ROW  LIMITS 

SKIP 

Support 

234-236 

DEGREES  END  OF  LOOP  IF 

LOOP 

Reserved  Words 

236-237 

FOR  XPLOT  YPLOT 

LET  Subcommands 

SET  Subcommands 

Library  Functions 

238-241 

241 

242-243 

SEQUENCE 

Characters  & Symbols 
CHARACTER,  LINES, 
FONT  Arguments 

244-246 

247-248 

To  keep  track  of  how  we  increase  our  DATAPLOT  vocabulary,  let  us  define  SVI  to  be  the  size 
of  our  vocabulary  after  tutorial  number  I.  For  I = 1 and  2,  SVI  = 24,  and  SV2  = 44,  resp. 
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Pie -Chart  (Data  File:  DOE  2CLB.DAT) 


Subroutine  Name:  nOEPtECH.DP  Ref.:  pda-dp. 2b 


Root  Cause  of  Unsafe  Occurrences 


Legend: 

EMR-OC  = Emergency  & Unusual  Occurrences. 

ENV'INC  = Environmental  Incidents. 

HAZ-OVX  = Radioactive/Hazadous  Material 
Overexposures. 

INT-CNT  = Internal  Contaminations. 

SKIN-CNT  = Skin  Contaminations. 
SUB-ABUSE  = Substance  Abuse  Incidents. 
UNPL-SD  = Unplanned  Shutdowns. 

VIOL-OP  = Violations  of  Operating  Procedures. 


Note:  The  above  pie  chart  is  based  on  fictitious  data  generated  for  tutorial  purposes. 
Ref.:  A:DOEPIECH.DP  (J.  FONG,  NIST,  3-31-92) 
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DATAPLOT  Code  - Continuation  Sheet 


. DOEPIECH.DP  (version  92-03-31,  Fong  & Filliben,  Revision  2)  - 

1.  SYSTEM  COMMANDS  -■ 

FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 89  85 

2.  INPUT  DATA  

COLUMN  LIMITS  16  132 
READ  DOE_2CLB.DAT  Y 

READ  A:DOE_PIE.DAT  Y 

COLUMN  LIMITS  1 15 
LET  RN  = NUMBER  Y 
SKIP  0 

LOOP  FOR  K = 1 1 RN 
ROW  LIMITS  K K 

READ  STRING  DOE_2CLB.DAT  S"K 
END  OF  LOOP 

3.  COMPUTATION  

4.  TITLE  COMMANDS  -- 

5.  LEGEND  COMMANDS  - 

6,  GRAPHICS  COMMANDS 

7.  LABEL  COMMANDS  -- 

8.  PLOT  COMMANDS  

LET  X = SEQUENCE  1 1 RN 
PIE  CHART  Y X 

9.  TEXT  COMMANDS  --- 

LET  XPCENT=41.8 
LET  XPMAX=68.6 
LET  YPCENT=55 
LET  YPMAX=90 
DEGREES 

LET  THETANEW=180 
LET  XCUR=-1 
LET  YCUR=0 

JUSTIFICATION  CENTER 
. LET  R = 1.25 
LET  R = .55 
HW  2 1 

LOOP  FOR  K = 1 1 RN 
LET  K2  = 2*K 
LET  XOLD=XCUR 
LET  YOLD=YCUR 
LET  XCUR=XPLOT(K2) 

LET  YCUR=YPLOT(K2) 

LET  XMID=(XOLD+XCUR)/2 
LET  YMID=(YOLD-*-YCUR)/2 
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DATAPLOT  Code  - Continuation  Sheet 


LET  THETAMID=ARCTAN(XM1D/YM1D)  IF  YMID  >=  0 
LET  THETAMID=ARCTAN(XMID/ABS(YM1D))  IF  YMID  < 0 
LET  THETAM1D=90-THETAMID  IF  YMID  >=  0 
LET  THETAMID=270+THETAMID  IF  YMID  < 0 
LET  XT=R*COS(THETAMID) 

LET  YT=R*SIN(THETAMID) 

LET  XPT=XPCENT+(XPMAX-XPCENT)*XT 
LET  YPT=YPCENT+(YPMAX-YPCENT)*YT 
LET  YK=Y(K) 

MOVE  XPT  YPT 
TEXT 

LET  YPT2  = YPT  - 2 
MOVE  XPT  YPT2 
TEXT  VALUOYK 
END  LOOP 

PRE-ERASE  OFF 

WINDOW  COORDINATES  0 0 95  95 
JUSTIFICATION  CENTER 
MOVE  60  84 
HW  5 3.5 

TEXT  RLCOOOT  UC()CLC()AUSE  OF  UC()ULC( )NSAFE  UC()OLC( )CCURRENCES 


JUSTIFICATION  LEFT 
MOVE  64  70 
HW  3.5  2.5 
TEXT  LLCOEGEND: 

MARGIN  64 

VERTICAL  SPACING  3.25 
MOVE  64  64 
HW  2.2  1.5 

TEXT  EMR-OC  = ELCOMERGENCY  & UC( )ULC( )NUSUAL  UC()OLC( )CCURRENCES. 

TEXT  ENV-INC  = ELC( )NVIRONMENTAL  UC( )ILC( INCIDENTS. 

TEXT  HAZ-OVX  = RLC( )ADIOACTIVE/UC( )HLC( )AZADOUS  UC( )MLC()ATERIAL 
MOVE  76  51 

TEXT  UCOOLCOVEREXPOSURES. 

TEXT  INT-CNT  = ILCONTERNAL  UC()CLC()ONTAMINATIONS. 

TEXT  SKIN-CNT  = SLCOKIN  UCOCLCOONTAMINATIONS. 

TEXT  SUB-ABUSE  = SLC( >UBSTANCE  UCOALCOBUSE  UC()ILC()NCIDENTS. 

TEXT  UNPL-SD  = ULC( )NPLANNED  UCOSLCOHUTDOWNS. 

TEXT  VIOL-OP  = VLCOIOLATIONS  OF  UC( )OLC( )PERATING  UC( )PLC()ROCEDURES. 

JUSTIFICATION  CENTER 
MOVE  60  13 

TEXT  NLCOOTE:  UCOTLCOHE  ABOVE  PIE  CHART  IS  BASED  ON  FICTITIOUS  DATA  GENERATED  FOR  TUTORIAL  PURPOSES. 
MOVE  60  8 

TEXT  RLCOEF.:  UC( )A:DOePIECH.DP  (J.  FONG,  NIST,  3-31-92) 
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DATAPLOT  Code  - Continuation  Sheet 


10.  CLOSURE  COMMANDS 

PAUSE 

ER 

EXIT 

END  OF  DOEPIECH.DP 

Note  to  Reader:  The  following  is  a listing  of  th  data 

file  DOE_2CLB.DAT,  which  is  also  stored 
. as  a backup  named  OOE_PIE.DAT: 


SKN-CNT 

240 

INT-CNT 

220 

HAZ-OVX 

200 

ENV-INC 

160 

VIOL-OP 

130 

UNPL-SD 

100 

EMR-OC 

90 

SUB-ABUSE 

80 
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Sect.  6.3  - Pareto  Chart  (Data  File:  DOE  2CLB.DAT) 


In  the  previous  two  sections,  we  learned  44  DATAPLOT  commands  to  write  two  macros: 
one  for  plotting  a histogram  from  a one-column  data  file,  and  the  other,  a pie  chart  from  two 
columns  of  data,  one  of  which  consists  of  characters  to  be  printed  alongside  the  numbers. 

We  are  now  ready  to  work  on  a chart  known  as  the  Pareto  Distribution  Chart,  which  is 
one  of  the  three  required  for  all  DOE  reports  on  the  Performance  Indicator  (PI)  data.  A typical 
Pareto  Chart  using  some  fictitious  data  for  tutorial  purposes  is  given  on  the  next  page.  To  code 
the  macro,  "DOEPARET.DP",  as  listed  on  pp.  113-114,  we  need  to  learn  9 new  commands, 
i.e„  BLANK,  CUMULATIVE  SUM,  LINES,  MAJOR  ...TIC  NUMBER,  MINOR  ...TIC 
NUMBER,  PLOT,  SORTC  and  SUM.  Note  that  SV3,  the  vocabulary  size,  has  grown  to  53. 


To  learn  the  essential  features  of  the  macro  "DOEPARET.DP",  and  means  of  adapting 
it  for  other  purposes,  we  examine  the  first  seven  of  the  9 segments  of  the  code  as  follows: 


Segment  of  Macro 

Comment  ID 

1.  System  Commands. 

C-603-1-1 

2.  Input  Data. 

C-603-2-1 

C-603-2-2 

C-603-2-3 

3.  Computation. 

C-603-3-1 

C-603-3-2 

4.  Title  Commands. 

C-603-4-1 

C-603-4-2 

C-603-4-3 

5.  Legend  Commands. 

C-603-5-1 

C-603-5-2 

6.  Graphics  Commands. 

C-603-6-1 

C-603-6-2 

7.  Label  Commands. 

C-603-7-1 

C-603-7-2 

C-603-7-3 

C-603-7-4 

C-603-7-5 

Comment  on  A Specific  Feature  of  DOEPARET.DP 

Window  corner  coordinates  set  at  (0,0)  and  (95,95). 

Input  data  file  name  set  as  "DOE_2CLB.DAT". 

Input  data  file  consists  of  two  columns,  with  the  width 
of  the  first  column  set  at  15  spaces. 

First  column  of  data  set  as  ASCII  characters. 

Input  file  sorted  by  second  column  in  decreasing  order. 
Delete  line  containing  SORTC  if  sorting  is  not  required. 

Title  of  plot  set  as  "Root  Cause  ..." 

UC(  )CLC(  )AUSE  denotes  upper  case  C,  lower  case  AUSE. 
Character  size  of  title  set  at  4 units. 

Legend  1 set  as  "Note:  ..." 

Legned  2 set  as  "Ref.:  ..." 

Bar  width  set  at  0.7  data  units  for  Y2  (percentage)  plot. 

Bar  width  set  at  0.7  data  units  for  Y3  (cumulative  Y2)  plot. 

Left  Y-axis  label  set  as  "Percentage". 

Right  Y-axis  label  set  as  "No.  of  ...". 

X-axis  label  set  as  "Nuclear  Energy,  etc.". 

X-axis  label  includes  a continuation  command  "...". 

X-tic  label  given  by  first  column  ascii  data  of  input  file. 
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Pareto  Chart  (Data  File:  DOE_2CLB.DAT) 


Subroutine  Name:  DOEPA RET. DP  Ref.:  pda-dp.  2c 


Root  Cause  of  Unsafe  Occurrences 


SKN-CNT  INT-CNT  HAZ-OVX  ENV-INC  VIOL-OP  UNPL-SD  EMR-OC  SUB-ABUSE 


Nuclear  Energy  Plant  Performance  P.l.  * 1200, 1300, 1400,  2100,  2300,  2500,  2600  & 4600 
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DATAPLOT  Code  - Continuation  Sheet 


. DOEPARET.DP  (version  92-03-31,  Fong  & Filliben,  Revision  3)  

1.  SYSTEM  COMMANDS  

FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

2.  INPUT  DATA  

COLUMN  LIMITS  16  132 
READ  DOE_2CLB.DAT  Y 

READ  A: DOE_PARE.DAT  Y 

COLUMN  LIMITS  1 15 

LET  RN  = NUMBER  Y 
SKIP  0 

LOOP  FOR  K = 1 1 RN 
ROW  LIMITS  K K 

READ  STRING  DOE_2CLB.DAT  S^K 
END  OF  LOOP 

3.  COMPUTATION  

LET  X = SEQUENCE  1 1 RN 
LET  INDEX  = SEQUENCE  1 1 RN 
LET  Y = -Y 

LET  Y = SORTC  Y INDEX 

LET  Y = -Y 

LET  N = SUM  Y 

LET  Y2  = 100*Y/N 

LET  Y3  = CUMULATIVE  SUM  Y2 

4.  TITLE  COMMANDS  

TITLE  RLCOOOT  UC( )CLC( )AUSE  OF  UC()ULC( )NSAFE  UC( )OLC()CCURRENCES 

TITLE  SIZE  4 

TITLE  DISPLACEMENT  2 

5.  LEGEND  COMMANDS  

LEGEND  1 NOTE:  FICTITIOUS  DATA  GENERATED  FOR  TUTORIAL  PURPOSES. 

LEGEND  2 REF.:  DOEPARET.DP  (J.  FONG,  NIST,  3-31-92) 

6.  GRAPHICS  COMMANDS  

LINES  BLANK  ALL 
BAR  ON  ON 
BAR  FILL  ON  OFF 
BAR  WIDTH  .7  .7 

7.  LABEL  COMMANDS  

Y1LABEL  PLCOERCENTAGE 
Y1LABEL  SIZE  2 
Y1LABEL  DISPLACEMENT  5 
YLIMITS  0 100 

Y2LABEL  NLCOO.  OF  UC(  )OLC(  )CCURRENCES  (UC()BLC(  )LACK  = EACH  UC()P.I.,  WLCOHITE  = UC()CLC(  )UMULATIVE) 
Y2LABEL  SIZE  2 
Y2LABEL  DISPLACEMENT  9 
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DATAPLOT  Code  - Continuation  Sheet 


XLABEL  NLCOUCLEAR  UC( )ELC( )NERGY  UCOPLCOLANT  UC( )PLC( )ERFORMANCE  UC()P.I.  # 1200.  ... 
1300,  1400,  2100,  2300,  2500,  2600  & 4600 

XLABEL  SIZE  1.8 
XLIMITS  1 RN 

MAJOR  X1TIC  NUMBER  RN 
MINOR  X1TIC  NUMBER  0 

X1TIC  LABEL  FORMAT  ALPHA 

LET  II  = INDEX(I) 

LET  STRING  DUMMY  = "S^II 

LOOP  FOR  K = 2 1 RN 
LET  rx  = INDEX(K) 

LET  STRING  DUMMY  = "DUMMY  "S"I"X 
END  LOOP 


X1TIC  LABEL  CONTENTS  "DUMMY 
X1TIC  LABEL  SIZE  2.0 

Y2TICS  ON 
Y2TIC  LABELS  ON 
Y2LIMITS  0 N 
Y2TIC  LABEL  NUMBER  3 

8.  PLOT  COMMANDS  -- 

PLOT  Y2  Y3  VS  X 
LEGEND  1 
LEGEND  2 

9.  CLOSURE  COMMANDS 

PAUSE 

ER 

EXIT 


END  OF  DOEPARET.DP 

Note  to  Reader:  The  following  is  a listing  of  the  data 
file  DOE_2CLB.DAT,  which  is  also  stored 
as  a backup  named  DOE_PARE.DAT: 


SKN-CNT 

240 

INT-CNT 

220 

HA2-OVX 

200 

ENV-INC 

160 

VIOL-OP 

130 

UNPL-SD 

100 

EMR-OC 

90 

SUB-ABUSE 

80 
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Sect.  6.4  - Summary  Plot  for  P.l.  4.4  (Data  File:  DOE  3COL.DAT) 


In  the  last  three  sections,  we  used  a total  of  53  DATAPLOT  commands  to  produce  a 
histogram,  a pie  chart,  and  a Pareto  distribution  chart. 

Our  goal  in  this  section  is  to  see  whether  those  53  commands  are  sufficient  for  us  to 
write  a new  macro  to  generate  a report-quality  plot  of  a specific  set  of  performance  indicator 
data  furnished  by  DOE  for  tutorial  purposes  only. 

On  Jan.  29,  1992,  we  received  from  DOE  a set  of  quarterly  data  of  Performance 
Indicator  4.4  (Corrective  Maintenance  Backlog)  from  7 DOE  organizations  during  CY-1991 
[16].  We  used  the  input  feature  of  the  expert  system  PDA  to  generate  the  following  table  of 
data  as  stored  in  a file  named  DOE  3COL.DAT: 


Column  1 to  25  Column  27  to  46  Column  48  to  67 

Organization  Quarter  Percentage  (%) 


NE 

1 

54.0 

NE 

2 

64.0 

NE 

3 

83.0 

OR 

1 

54.0 

OR 

2 

61.0 

OR 

3 

77.0 

ID 

1 

51.0 

ID 

2 

55.0 

ID 

3 

57.0 

DP 

1 

38.0 

DP 

2 

41.0 

CH 

1 

9.0 

CH 

2 

22.0 

SF 

1 

15.0 

SF 

2 

12.0 

ER 

1 

18.0 

ER 

2 

25.0 

To  complete  the  macro  DOEP4Q7F.DP  which  produces  the  plot  on  the  next  page,  we  need  to 
introduce  three  more  DATAPLOT  commands,  namely,  DELETE,  MAXIMUM  and  SUBSET. 
This  is  encouraging  news  to  the  first-time  user  of  DATAPLOT.  With  the  increase  of  the  size 
of  command  vocabulary  apparently  slowing  down  (SVl  = 24,  SV2  = 44,  SV3  = 53,  and  SV4 
= 56),  we  observe  that  the  tutorial  goal  of  acquiring  no  more  than  80  commands  to  reach  a 
certain  level  of  proficiency  in  DATAPLOT  coding  is,  perhaps,  achievable.  A listing  of  the 
DATAPLOT  macro,  DOEP4Q7F.DP,  appears  on  pp.  117-118. 
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Summary  Plot  for  P.L  4.4  (Data  File:  DOE_3COL.DAT) 


Subroutine  Name:  DOEP4Q7F.DP 


Ref:  pda-dp. 2d 


U.  S.  Department  of  Energy  (DOE)  --  CY-1991 
P I 4.4  - Corrective  Maintenance  (CM)  Backlog  Data 
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Note  1 : Data  furnished  by  D O E,  1 •29*92,  for  tutorial  purposes  only. 

Note  2:  Each  value  represents  a snapshot  of  the  % of  CM  backlog  at 

the  end  of  each  quarter. 

Note  3:  Some  CM  values  have  been  counted 
twice,  e.g.,  values  of  some  facilities 
at  ID,  OR,  and  CH  are  also  included 
in  NE’s  values. 


Data:  C:\  DATAPLOT\  DOE_3COL.DAT 
Macro:  A:\DOEP4Q7F.DP  (5-18-92) 


NE 


Id 

OR 


ID 


DP 


Id 

CH 


SF 


ER 


— 100 

— 90 

— 80 

— 70 

— 60 

o 

o> 
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” 50  C 
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— 40  “• 

— 30 

— 20 

— 10 

— 0 


1234.1234.1234.1234.1234.1234.1234 

Quarterly  Data  for  Year  1991 
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DATAPLOT  Code  - Continuation  Sheet 


D0EP4Q7F.DP  (version  92-05-18,  Fong  & Filliben,  Revision  2) 

1.  SYSTEM  COMMANDS  -- 

FEEDBACK  OFF 


DIMENSION  100  VARIABLES 

NE 

1 

54.0 

DEFINE  ER  ESC  FF 

NE 

2 

64.0 

TIC  OFFSET  UNITS  SCREEN 

NE 

3 

83.0 

TIC  OFFSET  5 5 

OR 

1 

54.0 

CHARACTER  COLOR  BLACK  ALL 

OR 

2 

61.0 

BAR  COLOR  BLACK  ALL 

OR 

3 

77.0 

DEVICE  2 POSTSCRIPT 

ID 

1 

51.0 

WINDOW  CORNER  COORDINATES  0 0 95  95 

ID 

2 

55.0 

2.  INPUT  DATA 

ID 

3 

57.0 

COLUMN  LIMITS  27  132 

DP 

1 

38.0 

READ  DOE  3COL.DAT  QUARTER  Y 

DP 

2 

41.0 

READ  A: D0E_PI44.DAT  QUARTER  Y 

CH 

1 

9,0 

COLUMN  LIMITS  1 25 

CH 

2 

22.0 

LET  RN  = NUMBER  Y 

SF 

1 

15.0 

SKIP  0 

SF 

2 

12.0 

LOOP  FOR  K = 1 1 RN 

ER 

1 

18.0 

ROW  LIMITS  K K 

ER 

2 

25.0 

READ  STRING  DOE  3C0L.DAT  S^K 
END  OF  LOOP 

3.  COMPUTATION 

LET  X = SEQUENCE  1 1 RN 

LET  INDEX  = SEQUENCE  1 1 RN 

LET  INDEX2  = INDEX 

DELETE  INDEX2  SUBSET  QUARTER  234 

LET  N = SUM  Y 

LET  Y2  = 100*Y/N 

LET  NUMSITE  = NUMBER  INDEX2 

LOOP  FOR  K = 1 1 NUMSITE 

LET  II  = INDEX2(K) 

LET  SITE  = K FOR  I = II  1 RN 


END  OF  LOOP 

LET  X2  = (SITE  - 1)*5  + QUARTER 


4.  TITLE  COMMANDS 


TITLE  P I 4.4  --  CLCOORRECTIVE  UC()MLC( )AINTEMANCE  UC()(CM)  BLCOACKLOG  UC()DLC()ATA 
TITLE  SIZE  3.5 
TITLE  DISPLACEMENT  2 

5.  LEGEND  COMMANDS  

6.  GRAPHICS  COMMANDS  

7.  LABEL  COMMANDS  

Y1  LABEL  PLCOERCENTAGE 

Y1LABEL  SIZE  2 

Y1LABEL  DISPLACEMENT  5 

Y1LIMITS  0 100 

Y2TICS  ON 

Y2TIC  LABELS  ON 

Y2LABEL  PLCOERCENTAGE 

Y2LABEL  SIZE  2 

Y2LABEL  DISPLACEMENT  8 

Y2LIMITS  0 100 

LET  NUMTICS  = 5*NUMSITE 

XLIMITS  1 NUMTICS 

MAJOR  X1TIC  NUMBER  NUMTICS 

MINOR  X1TIC  NUMBER  0 

X1TICS  OFF 
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DATAPLOT  Code  - Continuation  Sheet 

X1T1C  LABEL  FORMAT  ALPHA 
LET  STRING  SJUNK  = BL  1 2 3 4 
LET  STRING  SJ  = 1 2 3 4 . 

XITIC  LABEL  CONTENTS  ^SJ  ^SJ  ^SJ  ■'SJ  'SJ  'SJ  1 2 3 4 

X2LABEL  QLCOUARTERLY  UCC)DLC()ATA  FOR  UC()YLC()EAR  1991 

X2LABEL  SIZE  4 

X2LABEL  DISPLACEMENT  8 

CHAR  OFF  ALL 

LINES  BLANK  ALL 

BAR  ON  ON  ON  ON 

BAR  FILL  ON  ON  ON  ON 

BAR  WIDTH  .5  .5  .5  .5 

BAR  PATTERN  NONE  DU  SOLID  DUDD 

8.  PLOT  COMMANDS  

PLOT  Y X2  QUARTER 

JUSTIFICATION  CENTER 

LET  LEFTFRA  = 15 

LET  OFFSET  = 5 

LET  RIGHTFRA  = 85 

LET  START  = LEFTFRA+OFFSET 

LET  WIDTH  = (RIGHTFRA-OFFSET)-(LEFTFRA+OFFSET) 

LET  FU0GE1  = 1.5 
LET  FUOGE2  =1.03 
LET  YO  = 22 

LOOP  FOR  K = 1 1 NUMSITE 
LET  I'K  = INDEX2(K) 

LET  STRING  DUMMY  = 'S' I'K 

LET  P = (K-0.5)/NUMSITE 

LET  XO  = (START-FU0GE1)+P*WIDTH*FUDGE2 

MOVE  XO  YO 

TEXT  'DUMMY 

END  LOOP 

JUSTIFICATION  LEFT 
MOVE  20  84 
HW  2.2  1.5 

TEXT  NLCOOTE  1:  UCODLCOATA  FURNISHED  BY  UC()D  0 E,  1-29-92,  LCOFOR  TUTORIAL  PURPOSES  ONLY. 
MOVE  20  80 

TEXT  NLCOOTE  2:  UCOELCOACH  VALUE  REPRESENTS  A SNAPSHOT  OF  THE  % OF  UCOCM  LCOBACKLOG  AT 
MOVE  43  77 

TEXT  LCOTHE  END  OF  EACH  QUARTER. 

MOVE  43  72 

TEXT  NLCOOTE  3:  UCOSLCOOME  UCOCM  LCOVALUES  HAVE  BEEN  COUNTED 
MOVE  50  69 

TEXT  LCOTWICE,  E.G.,  VALUES  OF  SOME  FACILITIES 
MOVE  50  66 

TEXT  LCOAT  UCOIO,  OR,  LCOANO  UCOCH  LCOARE  ALSO  INCLUDED 
MOVE  50  63 

TEXT  LCOIN  UCONELCO'S  VALUES. 

MOVE  50  58 
HW  2 1.3 

TEXT  DLCOATA:  UCOC:\  DATAPLOT\  DOE  3COL.DAT 
MOVE  50  54 

TEXT  MLCOACRO:  UCOA:\  DOEP4Q7F.DP  (5-18-92) 

JUSTIFICATION  CENTER 
MOVE  50  97 
HW  3.5  2.4 

TEXT  U.  S.  UCODLCOEPARTMENT  OF  UCOELCONERGY  UCO(DOE)  --  CY-1991 

9.  CLOSURE  COMMANDS  

PAUSE 

ER 

EXIT 

END  OF  DOeP4Q7F.DP  
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Sect.  6.5  - 2D  Plot  with  Linear  Fit  (Data  File:  ASTM_2CL.DAT) 

So  far,  we  have  introduced  56  DATAPLOT  commands  for  presentation  graphics.  The 
second  group  of  13  commands,  to  be  introduced  in  Sections  6.5  through  6.11,  will  enable  us  to 
do  some  simple  analysis  and  modeling.  The  13  commands,  spread  among  7 macros,  are: 


Anal.  Option 

Name  of  Macro 

Datafile 

Name  of  Commands 

2DPlotFit 

DOEPLOTF.DP 

ASTM_2CL.DAT 

...  FIT;  LINEAR  FIT;  PRED; 

RESSD;  TPPF. 

C-Chart 

DOECCC.DP 

DOE  2CLA.DAT 

SPIKE. 

P-Chart 

DOEPCC.DP 

DOE  3COL.DAT 

Lag-Plot 

DOELAG.DP 

DOE_lCOL.DAT 

...  LAG  PLOT. 

AutocorrP 

DOEAUTO.DP 

D0E_1C0L.DAT 

AUTOCORRELATION ; 
AUTOCORRELATION  PLOT. 

Predict- 1 

DOEPREDl.DP 

DOE_3COL.DAT 

STANDARD  DEVIATION  OF  MEAN; 
DATA. 

Predict-2 

DOEPRED2.DP 

DOE_3COL.DAT 

WEIGHTED  MEAN;  CIRCLE. 

Group  2 - 

13  New  Commands 

in  7 Macros 

too 

90 

80 

70 

60 

0 

1 “ 

“■  40 

30 

20 

10 

0 


MACRO:  A:\  DOEPARET.DP4  (J.  FONG,  NIST,  5-15-02) 
DATA:  C:\DATAPLOT\OOE_2CLD.DAT 
ALSO:  C:\DATAPLOT\DOE  TUT2.DAT 


- 13 

- 12 
— 11 
- 10 

- 9 

— 8 
7 

— 6 

— 5 

— 4 
3 

— 2 
- 1 
- 0 


^ ^ 1 ^ 1 ^ ^ 

LIN  FIT  C-CHART  P-CHART  LAGPLOT  AUTOCOR  MODEL-1  MODEL-2 


7 DATAPLOT  Macros  for  Analysis  of  DOE  P.  I.  Data 
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Log  da/dN  ( Crack  Growth  Rate,  mm/cycle  ) 


Fong,  Bernstein  & Filliben  (1992)  on  'PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data" 


DATAPLOT  Code  for  analysis  option:  IDPlotFit 


Subroutine  Name:  DOEPLOTF.DP  Ref.:  pda-dp. 2e 


Typical  Y vs.  X Plot  with  Linear  Fit  and  95%  Confidence  Band 
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DATAPLOT  Code  - Continuation  Sheet 


OOEPLOTF.DP  (version  92-05-28,  Fong  & Filliben,  Revision  1) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  ASTM  2CL.DAT  Xl  Y1 

READ  A: ASTM_ANK.DAT  XI  Y1 
LET  X = LOGIO(XI) 

LET  Y = LOGIO(YI) 

LINEAR  FIT  Y X 
LET  N = NUMBER  X 
LET  TERM1  = 1/N 
LET  XBAR  = MEAN  X 
LET  DEL  = X-XBAR 
LET  DEL2  = DEL'DEL 
LET  SSQ2  = SUM  DEL2 
LET  TERM2  = DEL2/SSQ2 

LET  SDPRED  = RESSO*SORT(1  + TERM1  + TERM2) 

LET  NM2  = N-2 

LET  UPPER  = PRED+TPPF(.975,NM2)*SDPRED 

LET  LOWER  = PRED-TPPF( .975,NM2)*SDPRED 

LET  Y1  = MEAN  Y 

LET  DY  = Y - Y1 

LET  DY2  = DY*DY 

LET  D1  = SUM  DY2 

---  SLOPE  (A1)  & Y-INTERCEPT  (AO)  ARE  COMPUTED  FROM  LINEAR  FIT  --- 


LET  B1  = A1 

LET  EX  = B1*DEL 

LET  EX2  = EX*EX 

LET  El  = SUM  EX2 

LET  S2  = (D1  - E1)/(N  - 2) 

LET  F2  = E1/S2 

LET  FlC  = FPPF(0.95,1,NM2) 

TITLE  TLCOYPICAL  UC()Y  LCOVS.  UCOX  PLCOLOT  WITH  UC(  )LLC( ) INEAR  UCOFLCOIT  AND  95X  UC(  )CLC(  )ONFIDENCE  UCOBLCOANO 
TITLE  SIZE  3.5 

LEGEND  1 1974  SAE  RLCOOUND  UC( )RLC( )OBIN  - UCOLLCOAB  1,  UC( )FLC(  )ATIGUE  UC( )SLC( )PECIMEN  UC()M7A  MAN-TEN 
LEGEND  2 UCOFLCOONG,  UCOJ.  T.,  & DLCOOWLING,  UC()N.  £.,  ASTM  STP  738,  LCOPP.  171-193  (1981). 

LEGEND  3 A:\ASTMPLOTF.DP  (J.  FLCOONG  & UC()J.  FLC( ) ILLIBEN,  UCONIST,  5-28-92) 

Y1LABEL  LLCOOC  DA/DUC()N  ( CLCORACK  UC( )GLC( )ROWTH  UC(  )RLC(  )ATE , MM/CYCLE  ) 

YILABEL  SIZE  3 
Y1LABEL  DISPLACEMENT  5 

XLABEL  LLCOOC  DELTA-UCOK  ( SLCOTRESS  UCOILCONTENSITY  UC( )RLC( )ANGE  ) 

XLABEL  SIZE  3 
CHAR  X BLANK  BLANK  BLANK 
CHAR  SIZE  0.75 
LINES  BLANK  SOLID  DOT  DOT 
PLOT  Y PRED  UPPER  LOWER  VS  X 
JUSTIFICATION  LEFT 
MOVE  20  68 
HW  2 1.33 

TEXT  SLCOAMPLE  UCOSLCOIZE  = UCON  = ^N  . 

HOVE  20  64 

TEXT  SLCOLOPE  OF  UC( )RLC( )EGRESSION  UCOLLCOINE  = UCOBI  = ‘Bl 


RLCOESIDUAL  D.O.F.  = *NM2 


MOVE  21  58 

TEXT  RLCOESIDUAL  S.D.  = "RESSD 
MOVE  20  52 

TEXT  S2  = LCORESID.  S.D.  SOD  UCO  = 
MOVE  20  48 

TEXT  MSR  = MLCOEAN  gC( )SLC()QUARE 
MOVE  21  45 

TEXT  LCODUE  TO  UCORLCOEGRESSION 
MOVE  21  42 
TEXT  = *E1  . 


"S2  . 
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DATAPLOT  Code  - Continuation  Sheet 


MOVE  60  48 

TEXT  F-RLC()ATIO  UCOTLCOEST  FOR  UC(  )SLC( ) IGNI F ICANCE : 

MOVE  62  42 

TEXT  F2  = UC()MSR/S2  = *F2  . 

MOVE  62  38 

TEXT  FI  = F-LC()CRITICAL  = *F1C  . 

MOVE  60  32 

TEXT  CLCOONCLUSIOM:  RLC(  )EGRESSION  IS 
MOVE  62  29 

TEXT  LCOSIGNIFICANT  IF  UCOFI  < F2  . 

BOX  59  46.5  82  51 
BOX  20  56.5  39.5  61 
PAUSE 
ER 

EXIT 

END  OF  OOEPLOTF.DP 

. Note  to  Reader:  The  following  is  a listing  of  the  data 


ile  ASTM  2CL.DAT, 

which  is  also  stored 

> a backup  named  ASTM_ANtC.DAT: 

19.20 

0.000001144 

19.44 

0.000001259 

19.45 

0.000001287 

19.89 

0.000001851 

20.30 

0.000002010 

20.59 

0.000002055 

20.96 

0.000002145 

21.34 

0.000002193 

21.71 

0.000002243 

22.10 

0.000002377 

22.54 

0.000002586 

22.90 

0.000002728 

23.31 

0.000002925 

23.75 

0.000003123 

24.23 

0,000003233 

24.64 

0.000003469 

25.11 

0.000003731 

25.70 

0.000003962 

26.09 

0.000004276 

26.65 

0.000004670 

27.34 

0.000005363 

27.78 

0.000005811 

28.51 

0.000006376 

29.07 

0.000006836 

29.76 

0.000007306 

30.59 

0.000007938 

31.30 

0.000008442 

32.07 

0.000009207 

33.00 

0.000010050 

33.93 

0.000010840 

34.85 

0.000011650 

35.90 

0.000012820 

37.03 

0.000014380 

38.27 

0.000015880 

39.45 

0.000017540 

40.67 

0.000019120 

42.29 

0.000021190 

43.68 

0.000023790 

45.35 

0.000026950 

47.18 

0.000031140 

48.71 

0.000036010 

50.96 

0.000052080 

53.34 

0.000069480 
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Sect.  6.6  - Count  Chart  or  C-Chart  (Data  File:  DOE  2CLA.DAT) 


According  to  the  DOE  Guidance  Document  on  the  Performance  Indicator  (P.L)  Program 
[2],  DOE  and  DOE  contractor  line  management  are  required  to  assess  and  quantify  the 
information  for  each  PI  using  a Pareto  distribution  chart  and  two  control  charts  commonly 
known  as  the  C-Chart  and  the  P-Chart.  In  Section  6.4,  we  discussed  the  plotting  of  a Pareto 
chart  using  a DATAPLOT  macro  named  DOEPARET.DP.  In  this  section,  we  introduce  a 
macro  named  DOECCC.DP  and  some  fictitious  quarterly  data  for  P.L  No.  1.2  (Skin 
Contaminations)  to  produce  a C-Chart  on  the  next  page.  As  shown  on  page  A4-3  of  Reference 
[2],  the  control  chart  formulas  employed  in  developing  C-Charts  are: 

Central  Line  = c [average  of  data.  Data  from  all  previous  periods  up  to 

the  last  3 years  or  12  calendar  quarters  should  be  used 
in  calculating  the  average  of  data.] 

Upper  Control  Limit  (UCL)  = “ -I-  3 J ~ 

Lower  Control  Limit  (LCL)  = ~c  — 3 / "c 

In  the  same  reference,  it  is  also  stated  that  for  P.L  Nos.  1.5  (Lost  Work  Days),  1.6.1 
(Recordable  Injuries/Illness),  4.4  (Corrective  Maintenance  Backlog),  and  4.5  (Preventive 
Maintenance  Overdue),  the  use  of  C-Charts  is  not  appropriate.  For  a complete  documentation 
of  the  DOE  P.L  numbering  convention,  see  pages  ix-x  of  this  report. 

To  recap  our  DATAPLOT  tutorial,  we  recall  that  on  page  1 19,  we  intr(3duced  the  macro 
DOEPLOTF.DP  to  do  a linear  fit  of  two  columns  of  numbers  and  added  five  new  commands 
to  bring  the  size  of  the  command  vocabulary,  SV5,  to  61.  For  this  exercise,  only  one  new 
command,  SPIKE,  is  needed  (see  pp.  125-126).  The  new  vocabulary  size,  SV6,  is  now  62. 

Again,  it  is  useful  to  repeat  what  is  stated  in  [2]  that  in  evaluating  control  charts, 
managers  should  look  for  the  following  indications: 

Outliers  - Data  that  falls  outside  the  control  lines. 

Runs  - Series  of  data  points  over  or  below  the  central  line.  A "run"  of  7 
consecutive  points  or  10  out  of  1 1 points  indicates  an  abnormality. 

Trends  - Continual  rise  or  fall  of  data  points.  If  7 data  points  rise  or  fall 
continuously,  an  abnormality  is  considered  to  exist. 
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Count  Chart  or  C-Chart  (Data  File:  DOE_2CLA.DAT) 


Subroutine  Name:  DOECCC.DP  Ref.:  pda-dp. 3a 


U.  S.  Department  of  Energy  (DOE)  - Quarterly  Data 


40 


i2  30 

c 

o 

> 

HI 

_a) 

JQ 

20 

O 

Q. 

0) 

QC 

O 

d 

Z 


0 


1 2 3 4 5 6 7 8 9 10  11  12 


C-Chart  for  P.l.  No.  1.2  - Skin  Contaminations 


NOTE:  FICTITIOUS  DATA  GENERATED  FOR  SOFTWARE  TUTORIAL  PURPOSES. 
REF.:  A:\DOECCC.DP  (J.  FONG,  NIST,  3-31-92) 


Calendar  Quarter  ( 12  = Current,  1 = Prior  qtr.,  33  months  ago) 
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DATAPLOT  Code  - Continuation  Sheet 


DOECCC.DP  (version  92-03-31,  Fong  & Filliben,  Revision  4) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  DOE  2CLA.DAT  X Y 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A:DOE_CCC.DAT  X Y 

LET  N = NUMBER  Y 
LET  YBAR  = MEAN  Y 


3.  COMPUTATION 


LET  SDYBAR  = SORT (YBAR) 

LET  UPPER  = YBAR+3*SDYBAR 
LET  LOWER  = YBAR-3*SDYBAR 

4.  TITLE  COMMANDS  

TITLE  CLC()-UC()CLC()HART  FOR  UCOP.I.  NLCOO.  1.2  --  UC()SLC()KIN  UC(  )CLC(  )ONTAMINATIONS 

TITLE  SIZE  3.5 

TITLE  DISPLACEMENT  1.5 

5.  LEGEND  COMMANDS  


LEGEND  1 NOTE:  FICTITIOUS  DATA  GENERATED  FOR  SOFTWARE  TUTORIAL  PURPOSES. 

LEGEND  2 REF.:  A:\DOECCC.DP  (J.  FONG,  NIST,  3-31-92) 


6.  LABEL  COMMANDS 


Y1LABEL  NLCOO.  OF  UC( )RLC( )EPORTABLE  UC( )ELC( )VENTS 
Y1LABEL  SIZE  3 
Y1 LABEL  DISPLACEMENT  5 

XLIMITS  1 N 

XLABEL  CLCOALENDAR  UC( )QLC( )UARTER  ( 12  = UC( )CLC( )URRENT,  1 = UC( )PLC( )RIOR  QTR.,  33  MONTHS  AGO) 
XLABEL  SIZE  3 

7.  GRAPHICS  COMMANDS  

CHAR  CIRCLE  BL  BL  BL 
CHAR  FILL  ON 
CHAR  HW  1.5  1 
LINES  BLANK  SOLID  DOT  DOT 
SPIKE  ON  OFF  OFF  OFF 
SPIKE  BASE  YBAR 
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DATAPLOT  Code  - Continuation  Sheet 


8.  PLOT  COMMANDS  

PLOT  Y X AND 

PLOT  YBAR  FOR  X = 1 1 N AND 
PLOT  UPPER  FOR  X = 1 1 N AND 
PLOT  LOWER  FOR  X = 1 1 N 

JUSTIFICATION  CENTER 
MOVE  50  97 
HW  3 2 

TEXT  U.  S.  DLCOEPARTMENT  OF  UC(  )ELC(  )NERGY  UC()(D0E)  --  UC(  )QLC(  )UARTERLY  UCODLCOATA 

9.  CLOSURE  COMMANDS  

PAUSE 

ER 

EXIT 

END  OF  DOECCC.DP  

Note  to  Reader:  The  following  is  a listing  of  the  data 

. file  DOE_2CLA.DAT,  which  is  also  stored 

. as  a backup  named  DOE_CCC.DAT: 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 


20.0000000000 

19.0000000000 

28.0000000000 

18.0000000000 

25.0000000000 

25.0000000000 

14.0000000000 

20.0000000000 

16.0000000000 

22.0000000000 

24.0000000000 

17.0000000000 
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Sect.  6.7  - Proportion  Chart  or  P-Chart  (Data  File:  DOE_3COL.DAT) 

The  DOE  Guidance  Document  for  the  Performance  Indicator  (P.I.)  Program  [2]  states 
on  page  A4-4  that  "for  the  performance  indicators  Lost  Work  Days  (P.I.  #1.5),  Recordable 
Injuries/Illnesses  (P.I.  #1.6.1),  Corrective  Maintenance  Backlog  (P.I.  #4.4),  and  Preventive 
Maintenance  Overdue  (P.I.  #4.5),"  the  control  chart  to  be  used  is  not  the  C-Chart,  but  the  P- 
Chart  (otherwise  referred  to  as  "proportion"  chart). 

P-Charts  are  used  to  show  the  fraction  defective  of  a non-standard  sample  size  over  a 
constant  time  frame  of  reporting,  e.g.,  a calendar  month  or  quarter.  For  example,  the  sample 
size  for  the  corrective  maintenance  backlog  is  the  total  number  of  maintenance  items  scheduled 
for  the  period  of  interest.  If  we  denote  the  reporting  period  number  by  i (i  = 1,  2,  ...,  N), 
the  sample  size  by  n , and  the  number  of  maintenance  requests  unfilled  for,  say,  3 months,  by 
m , then  the  data  to  be  computed  and  plotted  for  developing  a P-Chart  are  as  follows: 

Fraction  defective  at  i-th  period  = y(i)  = m(i)  / n(i). 

Central  Line  = "p”  = Average  of  y(i),  i = 1,  2,  ...,  N. 

Upper  Control  Limit  (UCL)  = U(i)  = -I-  3 J ~p  { I )/n(i) 

Lower  Control  Limit  (LCL)  = L(i)  = T*  ~ 3 / "p  ( 1 -^)/n(i) 

Since  the  sample  size  n normally  varies  over  each  time  period,  the  control  limits  UCL  and 
LCL  also  vary  and  need  to  be  computed  for  i = 1,  2,  ...,  N.  Using  some  fictitious  data  for 
the  P.I.  #4.4  (Corrective  Maintenance  Backlog),  we  introduce  a macro  named  DOEPCC.DP  to 
plot  a P-Chart  on  the  next  page  for  a 3-column  (i,  m,  n)  datafile  named  DOE_3COL.DAT  (see 
p.  130).  No  new  command  is  needed  to  code  the  macro  DOEPCC.DP.  Thus  the  size  of  the 
command  vocabulary,  SV7,  is  the  same  as  SV6,  i.e.,  62. 

At  this  point,  we  have  completed  the  3-chart  requirement  of  the  analysis  described  in  the 
DOE  guidance  document  [2].  But  with  access  to  DATAPLOT,  much  more  analysis  could  be 
done  to  make  trend  predictions,  to  determine  the  cause  of  variations  in  operations  and  to  select 
appropriate  managerial  actions  to  effect  improvements.  In  the  next  two  sections,  we  introduce 
two  plots,  a lag  plot  and  an  autocorrelation  plot,  with  which  one  could  select  a specific  model 
to  predict  a future  data  point.  Using  the  same  set  of  20  data  points  for  P.I.  #4.4  in  this  section, 
we  show  in  Section  6.i0  that  a model  of  type  1 can  be  constructed  to  estimate  the  20th  point 
from  an  analysis  of  the  previous  19  points.  In  Section  6.11,  we  introduce  a 50-point  data  set 
to  show  that  a different  type  of  model  is  called  for  when  the  lag  plot  and  autocorrelation  plot 
give  indications  that  model  type  1 is  not  appropriate. 
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Proportion  Chart  or  P-Chart  (Data  File:  DOE_3COL.DAT) 


Subroutine  Name:  DOEPCC.DP  Ref,:  pda-dp. 3b 


9 

Ui 

(0 

c 

9 

o 

l» 

9 

a 


P-Chart  for  P.l.  No.  4.4  --  Corrective  Maint.  Backlog 


Time  (Quarter) 
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DATAPLOT  Code  - Continuation  Sheet 


DOEPCC.DP  (version  92-03-31,  Fong  & Filliben,  Revision  4) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  DOE  3COL.DAT  XI  Cl  NI 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A:DOE_PCC.DAT  XI  Cl  NI 

LET  Y = 100*(CI/NI) 

LET  N = NUMBER  Y 
LET  YBAR  = MEAN  Y 

LET  SDYBAR  = SQRT(YBAR*(100-YBAR)/NI ) 
LET  UPPER  = YBAR+3*SDYBAR 

LET  LOWER  = YBAR-3*SDYBAR 

LET  LOWER  = 0 SUBSET  LOWER  < 0 


TITLE  P-CLC()HART  FOR  UCOP.I.  NLCOO.  4.4  -- 

TITLE  SIZE  3 

TITLE  DISPLACEMENT  2 

Y1LABEL  PLCOERCENTAGE 
Y1LIMITS  0 30 


3.  COMPUTATION 


4.  TITLE  COMMANDS  

UCOCLCOORRECTIVE  UC()MLC()AINT.  UC()BLC( )ACKLOG 

5.  LABEL  COMMANDS  


XLABEL  TLCOIME  (UC()QLC<)UARTER) 

CHAR  CIRCLE  BL  BL  BL 
CHAR  FILL  ON 
CHAR  HW  1.5  1 
LINES  BLANK  SOLID  DOT  DOT 
SPIKE  ON  OFF  OFF  OFF 
SPIKE  BASE  YBAR 


6.  GRAPHICS  COMMANDS 


7.  LEGEND  COMMANDS 


LEGEND  1 NOTE:  FICTITIOUS  DATA  GENERATED  FOR  SOFTWARE  TUTORIAL  PURPOSES. 

LEGEND  2 REF.:  A:\DOEPCC.DP  (J.  FONG,  NIST,  3-31-92) 

8.  PLOT  COMMANDS  

PLOT  Y XI  AND 

PLOT  YBAR  FOR  X = 1 1 N AND 

PLOT  UPPER  XI  AND 

PLOT  LOWER  XI 

LEGEND  1 

LEGEND  2 
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DATAPLOT  Code  - Continuation  Sheet 


9.  CLOSURE  COHMANDS 

PAUSE 

ER 

EXIT 

END  OF  DOEPCC.DP  -- 

, Note  to  Reader:  The  following  is  a listing  of  the  data 

file  D0E_3C0L.DAT,  which  is  also  stored 
. as  a backup  named  DOE_PCC.DAT: 


1 

14 

125 

2 

19 

200 

3 

19 

188 

4 

24 

200 

5 

15 

200 

6 

16 

250 

7 

38 

390 

8 

40 

360 

9 

21 

250 

10 

32 

250 

11 

40 

395 

12 

25 

300 

13 

39 

310 

14 

36 

200 

15 

17 

300 

16 

19 

185 

17 

4 

55 

18 

9 

90 

19 

12 

130 

20 

26 

300 
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Sect.  6.8  - Lag  Plot  (Data  File:  DOE  1COL.DAT) 

In  the  last  seven  sections,  we  used  a 62-command  vocabulary  and  sample  data  sets  to 
produce  customized  and  report-quality  charts  such  as  histogram,  pie  chart,  Pareto  chart,  C- 
Chart,  and  P-Chart.  Beginning  with  this  section,  we  shall  introduce  a series  of  techniques  to 
answer  four  basic  questions  in  data  analysis,  i.e., 

0-6.8. 1 What  is  the  "randomness"  of  the  data  ? 

0-6. 8.2  What  is  the  "best-fit"  distribution  ? 

0-6. 8. 3 What  is  the  estimated  location  parameter  for  a fixed  distribution  ? 

0-6. 8.4  What  is  the  estimated  variation  parameter  for  a fixed  distribution  ? 

To  answer  the  first  question,  we  introduce  two  plots  that  will  yield  a measure  of 
"randomness"  both  graphically  and  quantitatively.  The  first  plot  is  known  as  a lag  plot,  and  by 
learning  one  new  command,  "LAG  PLOT",  a macro  named  DOELAG.DP  can  be  coded  to 
produce  the  plot  on  the  next  page.  A listing  of  that  macro  is  given  on  pp.  133-134.  The  size 
of  the  DATAPLOT  command  vcx^abulary  after  8 tutorials,  SV8,  is  now  63. 

To  interpret  the  meaning  of  the  lag  plot,  we  remark  that  for  data  taken  in  sequence  such 
as  those  reported  in  the  DOE  Performance  Indicator  (P.I.)  Program,  a tendency  known  as  "serial 
dependence"  often  exists  for  observations  made  close  together  in  time  to  be  more  alike  than 
those  taken  farther  apart.  Such  tendencies  of  non-randomness  can  be  demonstrated  by  plotting 
each  observation  against  the  immediately  preceding  one.  For  example,  consider  the  following 
data  set  as  listed  on  p.  130  for  P.I.  #4.4  (Corrective  Maintenance  Backlog)  with  computed  yj  : 


Time  (Ouarter) 

Unfilled  Requests 

Total  Requests 

% -Backlog 

i 

m, 

Hi 

Yi  = nii  / n 

1 

14 

125 

11.20 

2 

19 

200 

9.50 

3 

19 

188 

10.11 

19 

12 

130 

9.23 

20 

26 

300 

8.67 

For  i = 20,  19,  ...,  2,  we  plot  on  the  next  page  the  %-backlog  yj  , observed  at  quarter  i , 
against  the  previous  %-backlog  y;.,  , made  at  quarter  i-1  . Similar  plots  can  be  made  for  data 
two  units  apart  ( y;  versus  yi.2  ),  three  units  apart,  and  so  on.  The  distance  between  the 
observations  that  are  so  correlated  is  called  the  lag.  The  plot  given  on  the  next  page  is  a lag  1 
plot.  Graphically,  a shot  gun  pattern  implies  a qualitative  measure  of  "randomness." 


131 


Fong,  Bernstein  & Filliben  (1992)  on  "PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data’ 


Lag  Plot  (Data  File:  DOE_l COL.DAT) 


Subroutine  Name:  DOELAG.DP  Ref.:  pda-dp. 4a 


25 


20  — 


15  — 


10  — 


0 — 


Lag  Plot 


DATAPLOT/PC  VERSION  92.2  (J.  FILLIBEN,  NIST) 
REF:  A:\DOELAG.DP  (J.  T.  FONG,  NIST,  3-31-92) 
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20 


Percentage 
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DATAPLOT  Code  - Continuation  Sheet 


DOELAG.DP  (version  92-03-31,  Fong  & Filliben,  Revision  2 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  DOE  1C0L.DAT  Y 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A: DOE_LAG.DAT  Y 

READ  A:DOE_LAG2.DAT  Cl  NI 
LET  Y = 100*(CI/NI) 

READ  A:DOE_LAG3  XI  Cl  NI 
LET  Y = 100*(CI/NI) 

3.  COMPUTATION  

4.  TITLE  COMMANDS  

TITLE  LLCOAG  UC()PLC()LOT 

TITLE  SIZE  4 

TITLE  DISPLACEMENT  2 

5.  LABEL  COMMANDS  

XLABEL  PLCOERCENTAGE 
XLABEL  SIZE  3 
Y1 LABEL  SIZE  3 
Y1LABEL  DISPLACEMENT  5 
Y1L1MITS  0 25 

6.  GRAPHICS  COMMANDS  --- 

SPIKE  OFF 
CHAR  CIRCLE  ALL 
CHAR  FILL  ON  ALL 
LINES  BLANK  ALL 

7.  LEGEND  COMMANDS  

LEGEND  1 DATAPLOT/PC  VERSION  92.2  (J.  FILLIBEN,  NIST) 

LEGEND  2 REF:  A:\DOELAG.DP  (J.  T.  FONG,  NIST,  3-31-92) 


LAG  PLOT  Y 
LEGEND  1 
LEGEND  2 

PAUSE 

ER 

EXIT 


8.  PLOT  COMMANDS 


9.  CLOSURE  COMMANDS 


END  OF  DOELAG.DP 
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DATAPLOT  Code  - Continuation  Sheet 


Note  to  Reader:  The  following  is  a listing  of  the  data 
file  D0E_1C0L.DAT,  which  is  also  stored 
as  a backup  named  DOELAG.DAT: 


11.20 

9.50 
10.11 
12.00 

7.50 

6.40 
9.74 

11.11 

8.40 
12.80 
10.13 

8.33 

12.58 

18.00 

5.67 
10.27 

7.27 

10.00 

9.23 

8.67 
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Sect.  6.9  - Autocorrelation  Plot  (Data  File:  DOE_1COL.DAT) 

The  lag  plot  introduced  in  the  last  section  for  a set  of  data  , i = 1,  2,  , N,  can 

be  given  a quantitative  interpretation  through  a family  of  parameters  known  as  \h&  lag  k sample 
autocorrelation  coefficient  r^  . For  k = 1,  2,  N-1,  the  coefficients  r^  are  defined  by 


N -k 

2 ( Yi  - y ) ( Yi+k  - y ) 

i=l 

= ^ (1) 

S ^ ( y.  _ y )2 

i=l 

where  y = average  of  y . We  observe  that  for  k = 0,  the  autocorrelation  coefficient  is 
always  unity,  i.e.,  r,,  = 1,  For  k = 1,  2,  3,  , the  coefficients  r,^  vary  between  -1  and 

1 , and  can  be  meaningfully  computed  for  any  given  set  of  data,  yi  , y2  , • • • , yN  > provided  N 
is  not  too  small*®.  The  data  set  is  considered  to  be  randomly  distributed  without  serial 
dependence  if  all  of  the  r^  , k = 1,  2,  3,  ...  , are  zero  or  very  close  to  zero. 

To  illustrate  the  power  of  the  analysis  technique  based  on  r,, , we  compute  them  for  the 
20-point  data  set  used  in  the  last  section  (see  page  134)  for  k up  to  9 , and  plot  r^  versus 
k on  the  next  page  using  a DATAPLOT  macro  named  DOEAUTO.DP.  Two  new  commands, 
AUTOCORRELATION  and  AUTOCORRELATION  PLOT,  are  needed  to  code  the 
DATAPLOT  macro.  The  size  of  the  command  vocabulary,  SV9,  now  becomes  65. 

With  the  lag  1 plot  on  page  132  and  the  autocorrelation  plot  on  page  136,  we  can  make 
a statement  on  the  "randomness"  of  the  20-point  data  set.  First  of  all,  we  note  from  the 
autocorrelation  plot  that  the  lag  1 sample  autocorrelation  coefficient  equals  -0.15375,  and 
is  not  far  from  zero,  the  ideal  for  complete  randomness.  We  then  note  that  all  of  the  r^  plotted 
for  k = 1,  2,  ...  , 9 fall  within  the  95%  confidence  band  (solid  lines)  computed  by  the 
DATAPLOT  macro  using  an  approximation  explained  in  Kendall  & Stuart  [41,  pp.  292-293]. 
We  conclude  that  there  is  no  evidence  that  this  20-point  data  set  is  not  randomly  distributed. 


*°The  lag  k sample  autocorrelation  coefficient  is  a special  case  of  the  well-known  sample  correlation  coefficient 
r(yi»  y2).  which  measures  the  degree  of  association  between  two  random  variables  Y,  and  Yj  (see,  e.g..  Box, 
Hunter  & Hunter  [23,  p.  61]).  As  shown  by  Kendall  & Stuart  [41,  pp.  292-293],  the  distribution  of  r , through 
a transformation  of  variable  z = arc  tanh  r , is  very  close  to  normal  with  the  variance  of  z approximately  equal 
to  l/(N-3)  for  sample  size  N > 50.  However,  for  small  sample  sizes  (e.g.,  N = 10),  Box,  Hunter  & Hunter 
[23,  p.  63]  warned  that  calculated  auto-correlation  coefficients  are  unreliable  and  could  seriously  invalidate  stand- 
ard tests  that  assume  independence. 
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Autocorrelation  Plot  (Data  File:  DOE_lCOL.DAT) 


Subroutine  Name:  DOEAUTO.DP  Ref.:  pda-dp. 4b 


Autocorrelation  Plot 
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AUTOCORRELATION  R1  = -0.15375 
REF:  A:\DOEAUTO.DP  (J.  FONG,  NIST,  3-31-92) 


1 


T 


Legend:  Solid  lines  denote  95%  confidence  bounds. 
Dotted  lines  denote  99%  confidence  bounds. 


T 


LAG  K (DISTANCE  BETWEEN  OBSERVATIONS  SO  CORRELATED) 
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DATAPLOT  Code  - Continuation  Sheet 


DOEAUTO.DP  (version  92-03-31,  Fong  & FiUiben,  Revision  2) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  DOE_1COL.DAT  Y 

READ  A: DOE_AUTO.DAT  Y 

READ  A:DOE_AUT2.DAT  Cl  NI 
LET  Y = 100*(CI/NI) 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A: DOE_AUT3.DAT  XI  Cl  NI 
LET  Y = 100*(CI/NI) 


LET  R = AUTOCORRELATION  Y 


CHAR  CIRCLE  BL  BL  BL  BL  BL 
CHAR  FILL  ON  OFF  OFF  OFF  OFF  OFF 
CHAR  HW  1.5  1 ALL 

LINES  BLANK  SOLID  SOLID  SOLID  DOTTED  DOTTED 
SPIKE  ON  OFF  OFF  OFF  OFF  OFF 
SPIKE  BASE  0 


3.  COMPUTATION  

4.  GRAPHICS  COMMANDS 


5.  LEGEND  COMMANDS 


legend  1 AUTOCORRELATION  R1  = 

legend  2 REF:  A:\DOEAUTO.DP  (J.  FONG,  NIST,  3-31-92) 

] 6.  TITLE  COMMANDS  

TITLE  ALCOUTOCORRELATION  UCOPLCOLOT 

TITLE  SIZE  4 

TITLE  DISPLACEMENT  2 

7.  LABEL  COMMANDS  

Y1LIMITS  -1  1 

Y1LABEL  RK  (LAG  K SAMPLE  AUTOCORR.  COEFF.) 

Y1LABEL  SIZE  3 
Y1 LABEL  DISPLACEMENT  7 


XLABEL  LAG  K (DISTANCE  BETWEEN  OBSERVATIONS  SO  CORRELATED) 

XLABEL  SIZE  2.5 

8.  PLOT  COMMANDS 


AUTOCORRELATION  PLOT  Y 


JUSTIFICATION  CENTER 
MOVE  50  28 
HW  2.4  1.6 

TEXT  LLCOEGEND:  UC( )SLC( )OLID  LINES  DENOTE  95%  CONFIDENCE  BOUNDS. 
MOVE  54  24 

TEXT  DLCOOTTED  LINES  DENOTE  99%  CONFIDENCE  BOUNDS. 


9.  CLOSURE  COMMANDS 

PAUSE 

ER 

EXIT 

END  OF  DOEAUTO.DP  - 
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DATAPLOT  Code  - Continuation  Sheet 


Note  to  Reader:  The  following  is  a listing  of  the  data 
file  D0E_1C0L.DAT,  which  is  also  stored 
as  a backup  named  DOE_AUTO.DAT: 


11.20 

9.50 
10.11 
12.00 

7.50 

6.40 
9.74 

11.11 

8.40 
12.80 
10.13 

8.33 

12.58 

18.00 

5.67 
10.27 

7.27 

10.00 

9.23 

8.67 


138 


Fong,  Bernstein  & Filliben  (1992)  on  ’PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Dau’ 


Sect.  6.10  - P-Chart  with  Modeling-1  (Data  File:  DOE  3COL.DAT) 


In  Section  6.9,  we  learned  from  an  exploratory  data  analysis  using  a lag  plot  and  an 
autocorrelation  plot  for  a 20-point  data  set  that  the  assumption  of  randomness  is  valid.  This 
implies  that  all  four  questions  posed  in  Section  6.8  can  be  answered,  i.e.. 


Q-6.8.1  (Randomness): 

Yes. 

Q-6.8.2  (Distribution): 

Normal. 

Q-6.8.3  (Location): 

Sample  Mean. 

Q-6.8.4  (Variation): 

Sample  Variance. 

In  this  section,  we  shall  go  one  step  further  by  using  the  results  of  the  analysis  on  a N-point  data 
set  to  propose  a model  for  predicting  the  value  of  the  (N-l-l)th  data  point  with  a 3-sigma  band 
of  (X)nfidence  and  to  plot  the  prediction  on  a P-Chart  for  comparison  with  the  value  of  an  actual 
observation. 


Using  a macro  named  DOEPREDl.DP  as  listed  on  pp.  141-142,  we  first  obtain  a lag  plot 
and  an  autocorrelation  plot  for  the  first  19  points  of  the  same  data  set  we  used  for  the  exercise 
in  Section  6.7  (P-Chart).  The  resulting  plots  are  not  much  different  from  those  given  on  pages 
132  and  136,  and  are  not  reproduced  here  for  brevity.  After  we  are  assured  that  the  truncated 
data  set  is  randomly  distributed,  we  adopt  the  normal  distribution  as  a model  (type  1)  to  predict 
the  20th  point  using  the  mean  as  the  predicted  value  and  3 sigmas  as  the  99%  confidence  band. 
The  results  of  this  predictive  model  and  a comparison  with  the  actual  value  are  given  on  the  next 
page  in  the  form  of  a modified  P-chart.  We  observe  that  the  actual  value  falls  reasonably  well 
within  the  confidence  band  of  the  predicted  model. 

In  coding  the  macro  DOEPREDl.DP,  we  introduced  two  more  DATAPLOT  commands, 
namely,  STANDARD  DEVIATION  OF  THE  MEAN,  and  DATA.  The  size  of  our  command 
vocabulary,  SVIO,  is  now  67. 
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P-Chart  with  Modeling-1  (Data  File:  DOE_3COL.DAT) 


Subroutine  Name:  DOEPREni.DP  Ref.:  pda-dp. 4c 


P-Chart  for  P.l.  4.4  with  Model  for  Prediction 
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A 19-DATA  (SOLID  CIRCLE)  MODEL  FOR  PREDICTING  20TH  p<  WITH  3-SIGMA) 
WHERE  THE  ACTUAL  DATA  IS  GIVEN  BY  THE  HOLLOW  CIRCLE. 

REF.:  A:\DOEPRED1.DP  (J.  FONG,  NIST,  5-26-92) 

SAMPLE  MEAN  = 10.01275  . STANDARD  DEVIATION  OF  MEAN  = 0.632786 
PREDICTED  20TH  = 10.01275.  ACTUAL  20TH  = 8.666667. 


Time  (Quarter) 
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DATAPLOT  Code  - Continuation  Sheet 


D0EPRED1.DP  (version  92-05-26,  Fong  & Filliben,  Revision  3) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOU  CORNER  COORDINATES  0 0 95  95 

READ  DOE  3COL.DAT  XI  Cl  NI 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A: DOE_MB20.DAT  XI  Cl  NI 

LET  Y = 100*(CI/NI) 

LET  N = NUMBER  Y 


3.  COMPUTATION 


LET  Y2(1)=Y(N) 

LET  YACT  = Y(N) 

LET  X2(1)=XI(N) 

DELETE  Y XI  Cl  NI  FOR  I = N 1 N 

LET  N = N-1 

LET  YPRED=MEAN  Y 

LET  SDM  = STANDARD  DEVIATION  OF  THE  MEAN  Y 

LET  Y2(2)=YPRED 

LET  Y2(3)=YPRED+3*SDM 

LET  Y2(4)=YPRED-3*SDM 

LET  X2  = N+1  FOR  I = 1 1 4 

LET  TAG2  = DATA  2344 

LET  N = NUMBER  Y 
LET  YBAR  = MEAN  Y 

LET  SDYBAR  = SORT (YBAR* (100- YBAR )/N I ) 

LET  UPPER  = YBAR+3*SDYBAR 
LET  LOWER  = YBAR-3*SDYBAR 
LET  LOWER  = 0 SUBSET  LOWER  < 0 

3A.  LAG  PLOT  & AUTOCOR.  PLOT  FOR  MODELING  --- 

TITLE  LAG  1 PLOT 

CHAR  CIRCLE  ALL 

CHAR  FILL  ON  ALL 

LINES  BLANK  ALL 

LET  R = AUTOCORRELATION  Y 

legend  1 AUTOCORRELATION  R1  = "R 

LAG  PLOT  Y 

PAUSE 


CHAR  CIRCLE  BL  BL  BL  BL  BL 
CHAR  FILL  ON  OFF  OFF  OFF  OFF  OFF 
CHAR  HW  1.5  1 ALL 

LINES  BLANK  SOLID  SOLID  SOLID  DOTTED  DOTTED 
SPIKE  ON  OFF  OFF  OFF  OFF  OFF 
SPIKE  BASE  0 

TITLE  AUTOCORRELATION  PLOT 
AUTOCORRELATION  PLOT  Y 
PAUSE 
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DATAPLOT  Code  - Continuation  Sheet 


4.  TITLE  COMMANDS  

TITLE  P-CLC()HART  FOR  UCOP.Io  4.4  LCOWITH  UC( )MLC( )00EL  FOR  UC()PLC()REDICTION 
TITLE  SIZE  3.5 
TITLE  DISPLACEMENT  2 

5.  LABEL  COMMANDS  

Y1  LABEL  PLCOERCENTAGE 
Y1 LABEL  SIZE  3 
Y1 LABEL  DISPLACEMENT  7 
YILIMITS  0 30 

XLABEL  TLCOIHE  (UC()QLC()UARTER) 

XLABEL  SIZE  3 

6.  GRAPHICS  COMMANDS  

CHAR  CIRCLE  BL  BL  BL  CIRCLE  X - 
CHAR  FILL  ON  OFF  OFF  OFF  OFF  OFF  OFF 
CHAR  HW  1.5  1 ALL 

LINES  BLANK  SOLID  DOT  DOT  BLANK  BLANK  SOLID 
SPIKE  ON  OFF  OFF  OFF  OFF  OFF  OFF 
SPIKE  BASE  YBAR 

7.  LEGEND  COMMANDS  

A 19-DATA  (solid  circle)  MODEL  FOR  PREDICTING  20th  (x  with  3-sigma) 
where  the  actual  data  is  given  by  the  hollow  circle. 

Ref.:  A:\DOEPRED1.DP  (J.  FONG,  NIST,  5-26-92) 

SAMPLE  MEAN  = ^YBAR  . STANDARD  DEVIATION  OF  MEAN  = ^SOM 
PREDICTED  20TH  = ^YPRED  . ACTUAL  20TH  = "YACT  . 

8.  PLOT  COMMANDS  

PLOT  Y XI  AND 

PLOT  YBAR  FOR  X = 1 1 N AND 
PLOT  UPPER  XI  AND 
PLOT  LOWER  XI  AND 
PLOT  Y2  X2  TAG2 

9.  CLOSURE  COMMANDS  

PAUSE 

ER 

EXIT 

. Note  to  Reader:  The  following  is  a listing  of  the  data 

. file  DOE_3COL.DAT,  which  is  also  stored 

. as  a backup  named  DOE_MB20.DAT: 


1 

14 

125 

2 

19 

200 

3 

19 

188 

4 

24 

200 

5 

15 

200 

6 

16 

250 

7 

38 

390 

8 

40 

360 

9 

21 

250 

10 

32 

250 

11 

40 

395 

12 

25 

300 

13 

39 

310 

14 

36 

200 

15 

17 

300 

16 

19 

185 

17 

4 

55 

18 

9 

90 

19 

12 

130 

20 

26 

300 

LEGEND  1 
LEGEND  2 
LEGEND  3 
LEGEND  4 
LEGEND  5 
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Sect.  6.11  - P-Chart  with  Modeling-2  (Data  File:  D0E_3C0L.DAT) 

In  Section  10,  we  introduced  a normal  distribution  model  to  predict  a future  data  point 
when  an  autocorrelation  plot  showed  that  the  assumption  of  randomness  in  a given  data  set  is 
valid.  In  this  section,  we  shall  show  that  a different  model  needs  to  be  introduced  if  the 
autocorrelation  plot  reveals  that  the  data  set  shows  serial  dependence,  i.e.,  the  assumption  of 
randomness  is  not  valid. 

To  illustrate  this  exercise,  we  choose  to  work  with  a 50-point  data  set  that  we  know  is 
not  randomly  distributed.  The  data  set  is  listed  on  page  148.  On  pp.  146-147,  we  list  a new 
macro  named  DOEPRED2.DP  which  is  designed  to  first  produce  a lag  plot  and  an 
autocorrelation  plot  (see  page  144)  for  interpretation.  In  this  case,  we  observe  that  the  lag  plot 
is  far  from  a shot-gun  pattern  and  the  lag  1 autocorrelation  coefficient,  R,,  is  too  far  from  being 
zero,  the  ideal  for  randomness  of  the  data.  The  autocorrelation  plot  also  shows  that  most  of  the 
Rfc,  k=l,2,3,...,  are  outside  the  99%  confidence  band  such  that  we  can  safely  conclude  the  data 
set  is  not  random. 

With  the  question  of  randomness  answered  in  the  negative,  we  need  to  look  for  a new 
model  to  predict  the  (N-f-l)th  point  from  a N-point  data  set.  Experience  shows  that  a good 
model  would  give  more  weight  to  those  data  points  of  the  most  recent  past,  so  a simple  example 
would  be  to  adopt  a weighted-mean,  truncated-series  model  to  predict  the  50th  point  based  on 
a 49-point  data  set.  The  truncation  is  accomplished  through  the  use  of  a window  parameter 
where  in  this  case  only  10  of  the  data  points  nearest  to  the  50th  are  used.  A one  to  ten  scale 
of  weights  are  assigned  with  ten  being  assigned  to  the  49th  point,  nine  to  the  48th,  etc.  The 
predicted  value  of  the  50th  point  is  plotted  on  page  145  to  show  that  the  actual  value  of  the  50th 
point  does  fall  reasonably  well  within  the  3-sigma  band  of  99%  confidence. 

In  coding  the  macro  DOEPRED2.DP,  we  introduced  two  additional  commands,  namely, 
CIRCLE  and  WEIGHTED  MEAN.  The  command  vocabulary,  SV12,  is  now  69.  A summary 
of  the  size  increase  of  the  DATAPLOT  command  vocabulary  as  we  step  through  the  first  1 1 
sections  of  this  tutorial  chapter  is  given  below: 


Section 

LI 

LI 

£4 

LI 

LL 

LI 

LL 

L9 

6.10 

6.11 

New  Commands 

24 

20 

9 

3 

5 

1 

0 

1 

2 

2 

2 

Size  of  Vocabulary 

24 

44 

53 

56 

61 

62 

62 

63 

65 

67 

69 
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14  — 


13  — 


AUTOCORRELATION  R1  = 0.953274 


• • • 


12  - 


11  — 


10  — 


• • f 


• t 
f • 

• fit 

• • f 


f 

f f 

t • • f 
f 


6 — 


10 


11 


12 


13 


14 


AUTOCORRELATION  PLOT 


0.5  — 


-0.5  — 
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P-Chart  with  Modeling-2  (Data  File:  DOE_3COL.DAT) 


Subroutine  Name:  DOEPRED2.DP  Ref.:  pda-dp. 4d 


P-Chart  for  P.l.  4.4  with  Model  for  Prediction 


25 


20 


15 


10 


5 


0 


0 1 0 20  30  40  50 


A 49-DATA  (SOLID  CIRCLE)  MODEL  FOR  PREDICTING  50TH  p(  WITH  3-SIGMA) 
WHERE  THE  ACTUAL  DATA  IS  GIVEN  BY  THE  HOLLOW  CIRCLE. 

REF.:  A:\DOEPRED2.DP  (J.  FONG,  NIST,  5-26-92) 

SAMPLE  MEAN  = 9.22449.  SD  = 2.131269.  SD  OF  WEIGHTED  MEAN*  = 0.673967 
PREDICTED  50TH  = 12.92728  . ACTUAL  50TH  = 12  . 


*based  on  a window  of  10  points  nearest  to  the  50th  point 
with  weights  1 to  10, 10  being  assigned  to  the  49th. 


Time  (Quarter) 
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DATAPLOT  Code  - Continuation  Sheet 


D0EPRED2.DP  (version  92-05-26,  Fong  & Filliben,  Revision  3) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHAR  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

READ  DOE  3COL.DAT  XI  Cl  NI 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A: DOE_MB50.DAT  XI  Cl  NI 

LET  Y = 100*(CI/NI) 

LET  N = NUMBER  Y 


3.  COMPUTATION 


LET  Y2(1)  = Y<N) 

LET  YACT  = Y(N) 

LET  X2(1)  = XI(N) 

DELETE  Y XI  Cl  NI  FOR  I = N 1 N 


LET  N = N-1 

LET  WINDOW  = 10 

LET  NSTART  = N-(WINDOW-I) 

LET  W = 0 FOR  I = 1 1 N 

LET  W = SEQUENCE  1 1 WINDOW  FOR  1 = NSTART  1 N 
LET  YPRED=WEIGHTED  MEAN  Y W 
LET  SDY  = STANDARD  DEVIATION  Y 

LET  SDM  = SDY/SQRT (WINDOW) 

LET  Y2(2)=YPRED 
LET  Y2(3)=YPRED+3*SDM 
LET  Y2(4)=YPRED-3*SDM 
LET  X2  = N+1  FOR  I = 1 1 A 
LET  TAG2  = DATA  2344 

LET  N = NUMBER  Y 
LET  YBAR  = MEAN  Y 

LET  SDYBAR  = SQRT(YBAR*(100-YBAR)/NI ) 

LET  UPPER  = YBAR+3*SDYBAR 

LET  LOWER  = YBAR-3*SDYBAR 

LET  LOWER  = 0 SUBSET  LOWER  < 0 

3A.  LAG  PLOT  & AUTOCOR.  PLOT  FOR  MODELING 

TITLE  LAG  1 PLOT 

CHAR  CIRCLE  ALL 

CHAR  FILL  ON  ALL 

LINES  BLANK  ALL 

LET  R = AUTOCORRELATION  Y 

LEGEND  1 AUTOCORRELATION  R1  = ^R 

LAG  PLOT  Y 

PAUSE 


CHAR  CIRCLE  BL  BL  BL  BL  BL 
CHAR  FILL  ON  OFF  OFF  OFF  OFF  OFF 
CHAR  HW  1.5  1 ALL 
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DATAPLOT  Code  - Continuation  Sheet 


LINES  BLANK  SOLID  SOLID  SOLID  DOTTED  DOTTED 
SPIKE  ON  OFF  OFF  OFF  OFF  OFF 
SPIKE  BASE  0 


TITLE  AUTOCORRELATION  PLOT 
AUTOCORRELATION  PLOT  Y 
PAUSE 

4.  TITLE  COMMANDS  

TITLE  P-CLC()HART  FOR  UC()P.I.  4.4  LCOWITH  UC()MLC()OOEL  FOR  UC()PLC()REDICTION 
TITLE  SIZE  3.5 
TITLE  DISPLACEMENT  2 

5.  LABEL  COMMANDS  

Y1LABEL  PLCOERCENTAGE 
Y1 LABEL  SIZE  3 
Y1 LABEL  DISPLACEMENT  7 
Y1LIMITS  0 25 


XLABEL  TLCOIME  (UC()QLC( )UARTER) 

XLABEL  SIZE  3 

6.  GRAPHICS  COMMANDS  

CHAR  CIRCLE  BL  BL  BL  CIRCLE  X - 
CHAR  FILL  ON  OFF  OFF  OFF  OFF  OFF  OFF 
CHAR  HU  1.5  1 ALL 

LINES  BLANK  SOLID  DOT  DOT  BLANK  BLANK  SOLID 
SPIKE  ON  OFF  OFF  OFF  OFF  OFF  OFF 
SPIKE  BASE  YBAR 

7.  LEGEND  COMMANDS  

LEGEND  1 A 49-data  (solid  circle)  model  for  predicting  50th  (x  with  3-sigma) 
LEGEND  2 where  the  actual  data  is  given  by  the  hollow  circle. 

LEGEND  3 Ref.:  A:\DOEPRED2.DP  (J.  FONG,  NIST,  5-26-92) 

LEGEND  4 Sample  Mean  = *YBAR  . SD  = ^SOY  . SD  of  Weighted  Mean*  = ^SDM  . 

LEGEND  5 Predicted  50th  = "YPRED  . Actual  50th  = "YACT  . 


PLOT  Y XI  AND 

PLOT  YBAR  FOR  X = 1 1 N AND 
PLOT  UPPER  XI  AND 
PLOT  LOWER  XI  AND 
PLOT  Y2  X2  TAG2 


8.  PLOT  COMMANDS 


JUSTIFICATION  CENTER 
MOVE  50  28 
HU  2.4  1.6 

TEXT  *LC()BASED  ON  A WINDOW  OF  10  POINTS  NEAREST  TO  THE  50TH  POINT 
MOVE  52  24 

TEXT  LCOWITH  WEIGHTS  1 TO  10,  10  BEING  ASSIGNED  TO  THE  49TH. 

9.  CLOSURE  COMMANDS 

PAUSE 

ER 

EXIT 

END  OF  DOEPRED2.DP 


Note  to  Reader:  The  following  is  a listing  of  the  data 
file  DOE_3COL.DAT,  which  is  also  stored 
as  a backup  named  DOE_MB50.DAT: 
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DATAPLOT  Code  - Continuation  Sheet 


Note  to  Reader:  The  following  is  a listing  of  the  data 
file  DOE_3COL.OAT,  which  is  also  stored 
as  a backup  named  DOE_MB50.DAT: 


1 

18.00 

200 

2 

17.00 

200 

3 

18.00 

200 

4 

19.00 

200 

5 

18.00 

200 

6 

17.00 

200 

7 

15.00 

200 

8 

14.00 

200 

9 

15.00 

200 

10 

15.00 

200 

11 

17.00 

200 

12 

18.00 

200 

13 

18.00 

200 

14 

19.00 

200 

15 

19.00 

200 

16 

21.00 

200 

17 

20.00 

200 

18 

16.00 

200 

19 

14.00 

200 

20 

13.00 

200 

21 

13.00 

200 

22 

15.00 

200 

23 

15.00 

200 

24 

16.00 

200 

25 

15.00 

200 

26 

14.00 

200 

27 

13.00 

200 

28 

14.00 

200 

29 

15.00 

200 

30 

14.00 

200 

31 

15.00 

200 

32 

16.00 

200 

33 

15.00 

200 

34 

16.00 

200 

35 

19.00 

200 

36 

20.00 

200 

37 

20.00 

200 

38 

21.00 

200 

39 

22.00 

200 

40 

23.00 

200 

41 

24.00 

200 

42 

25.00 

200 

43 

27.00 

200 

44 

26.00 

200 

45 

26.00 

200 

46 

26.00 

200 

47 

27.00 

200 

48 

26.00 

200 

49 

25.00 

200 

50 

24.00 

200 
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Sect.  6.12  - Exploratory  Analysis-1  (Data  File:  ASTM  1 CL. DAT) 


The  tutorials  of  the  last  eleven  sections  (6.1  through  6.11)  were  designed  primarily  for 
DOE-specific  data  sets  except  for  Section  6.5  on  linear  fit  which  was  intended  for  a general 
audience.  With  69  DATAPLOT  commands  and  1 1 macros,  we  learned  to  produce  report-quality 
graphics  such  as  histograms,  pie-chart,  Pareto-chart,  C-chart,  and  P-chart.  We  also  learned  to 
interpret  the  results  of  a lag  plot  and  an  autocorrelation  plot  to  justify  the  use  of  two  predictive 
models  for  sample  data  sets  with  or  without  the  likelihood  of  serial  dependence. 

In  the  next  three  sections,  we  intend  to  introduce  9 more  DATAPLOT  macros  using  16 
new  commands  to  address  more  thoroughly  the  same  four  questions  posed  earlier  in  Sect.  6.8: 


What  is  the  "randomness"  of  the  data  ? 

What  is  the  "best-fit"  distribution  for  a given  set  of  data  ? 

What  is  the  estimated  location  parameter  for  a fixed  distribution  ? 
What  is  the  estimated  variation  parameter  for  a fixed  distribution  ? 


To  illustrate  the  additional  analysis  techniques,  we  use  the  following  sample  data  set  which  came 
from  a paper  by  Fong  and  Dowling  [8]  based  on  the  test  data  generated  by  6 laboratories  in  a 
1974  round  robin  program  sponsored  by  the  Society  of  Automotive  Engineers  (SAE): 


Lab.  No. 

1 

1 


Specimen  No. 

1 

212 


Crack  Growth  Rate  Exponent" 

3.535 

3.038'^ 


1 

2'^ 


3.038 

3.218'^ 


1 

2'^ 


3.218 

3.263'^ 


1 

2'^ 


3.263 

3.014'^ 


1 

2'^ 


3.014 

3.535"= 


3.760 

4.221 


"Each  exponent  is  the  slope  of  a regression  line  based  on  a linear  fit  of  43  or  more  test  data  as  shown  in  Sect.  6.5. 
'fictitious  data  introduced  to  illustrate  interlaboratory  data  analysis  techniques  [8]  when  we  discovered  Labs  1-5 
had  data  only  on  one  specimen.  All  12  data  are  used  in  Sect.  6. 12  and  6. 14  to  illustrate  univariate  data  analysis. 
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Summary  4-Plot  (Data  File:  ASTM  ICLDAT) 


Subroutine  Name:  STATSUM4.nP  Ref.:  pda-dp. 5b  1 


STATSUM4.DP  (version  92-04-10,  Fong  & Filliben,  Revision  1) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  ASTM  1 CL. DAT  Y 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A:ASTM  FCG.DAT  Y 


TITLE  SLCOUMMARY  4-UC( >PLC( )L0T 

TITLE  SIZE  4 

TITLE  DISPLACEMENT  2 

X3LABEL  AUTOMATIC 

SPIKE  OFF 
CHAR  CIRCLE  ALL 
CHAR  FILL  ON  ALL 
LINES  BLANK  ALL 


4-PLOT  Y 

PAUSE 

ER 

EXIT 


3.  COMPUTATION  -- 

4.  TITLE  COMMANDS 

(UCORLCOEF.:  A: \UC( )STATSUM4.DP) 


5.  LABEL  COMMANDS  -- 

6.  GRAPHICS  COMMANDS 

7.  LEGEND  COMMANDS  - 

8.  PLOT  COMMANDS  --- 

9.  CLOSURE  COMMANDS 


END  OF  STATSUM4.DP 


Note  to  Reader:  The  following  is  a listing  of  the  data 
file  ASTM_1CL.DAT,  which  is  also  stored 
as  a backup  named  ASTM_FCG.DAT: 


3.535 

3.038 

3.038 

3.218 

3.218 

3.263 

3.263 

3.014 

3.014 

3.535 

3.760 

4.221 
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DATAPLOT  Code  - Continuation  Sheet 


RUN  SEQUENCE  PLOT  Y 


Summary  4-Plot  (Ref.:  a:\STATSUM4.DP) 


2 3 4 6 6 


HISTOGRAM  Y 


Fong,  Bcmslein  & Filliben  (1992)  on  'PDA:  A PC-based  Expert  System  for  Analysis  of  IX)E  Nuclear  Energy  Performance  Indicator  Dau" 


DATAPLOT  Code  - Continuation  Sheet 


3.8 

3.7 

3.6 

3.5 

3.4 

3.3 

3.2 

ai 

3 

3 3.5  4 4.5  5 

LAG  PLOT  Y 

Summary  4-Plot  (Ref.:  a:\STATSUM4.DP) 

5 

4.5 

4 

3.5 

3 


NORMAL  PPOeAfiABtLrTY  PLOTY 


152 


Fong,  Bernstein  & Filliben  (1992)  on  "PDA:  A PC-based  Expert  System  for  Analysis  of  IX)E  Nuclear  Energy  Performance  Indicator  Data’ 


Summary  Tabulation  (Data  File:  ASTM  ICLDAT) 


Subroutine  Name:  STATSUMT.DP  Ref.:  pda-dp. 5b2 


STATSUMT.DP  (version  92-04-02,  Fong  & Filliben,  Revision  0) 


FEEDBACK  OFF 
DIMENSION  100  VARIABLES 
DEFINE  ER  ESC  FF 
DEVICE  2 POSTSCRIPT 
CAPTURE  A:ASTM_FCG.OUT 

READ  ASTM  1 CL. DAT  Y 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A: ASTM  FCG.DAT  Y 


SUMMARY  Y 

END  OF  CAPTURE 

PAUSE 

ER 

EXIT 


3.  COMPUTATION  

4.  TITLE  COMMANDS  -- 

5.  LABEL  COMMANDS  -- 

6.  GRAPHICS  COMMANDS 

7.  LEGEND  COFWANDS  - 

8.  PLOT  COMMANDS  --- 

9.  CLOSURE  COMMANDS 


END  OF  STATSUMT.DP 


Note  to  Reader:  The  following  is  a listing  of  the  data 
file  ASTM_1CL.DAT,  which  is  also  stored 
in  two  backups  named  ASTM_FCG.DAT: 


3.535 

3.038 

3.038 

3.218 

3.218 

3.263 

3.263 

3.014 

3.014 

3.535 

3.760 

4.221 
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DATAPLOT  Code  - Continuation  Sheet 


SUMMARY 

NUMBER  OF  OBSERVATIONS  = 


12 


★★★★★★★★★★★♦★★★★★★★★★★★★★★★★★★★★★★★★***********<r******************<r**** 

* LOCATION  MEASURES  * DISPERSION  MEASURES  * 

*********************************************************************** 


* 

MIDRANGE 

= 

0.3617500E+01 

* 

RANGE 

0.1207000E+01 

* 

* 

MEAN 

0.3343083E+01 

* 

STAND.  DEV.  = 

0. 36495 12E+00 

* 

* 

MIDMEAN 

0.3165000E+01 

* 

AV.  AB.  DEV.  = 

0.2530833E+00 

* 

* 

MEDIAN 

0.3240500E+01 

* 

MINIMUM 

0.3014000E+01 

* 

* 

* 

LOWER  QUART.  = 

0.3038000E+01 

* 

* 

* 

LOWER  HINGE  = 

0.3038000E+01 

* 

* 

* 

UPPER  HINGE 

0.3535000E+01 

* 

* 

= 

* 

UPPER  QUART.  = 

0.3535000E+01 

* 

* 

* 

MAXIMUM  = 

0.4221000E+01 

* 

*********************************************************************** 

* RANDOMNESS  MEASURES  * DISTRIBUTIONAL  MEASURES  * 

*********************************************************************** 


* AUTOCO  COEF 

= 

0. 643555 1E+00 

* 

ST.  3RD 

MOM. 

= 

0.11 7871 5E+01 

* 

* 

=: 

O.OOOOOOOE+00 

* 

ST.  4TH 

MOM. 

= 

0.3424925E’^01 

* 

* 

O.OOOOOOOE+00 

* 

ST.  WILK-SHA 

-0.2921 102E+01 

* 

* 

= 

* 

UNIFORM 

PPCC 

= 

0.9026427E+00 

* 

* 

= 

* 

NORMAL 

PPCC 

0.9154305E+00 

* 

* 

= 

* 

TUK  -.5 

PPCC 

= 

0.9094493E+00 

* 

* 

* 

CAUCHY 

PPCC 

= 

0.8857194E’^00 

* 

*********************************************************************** 
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Lambda  Test  (Data  File:  ASTM_1CL.DAT) 


Subroutine  Name:  STATTESL.DP  Ref.:  pda-dp. 5cl 


Tukey  Lambda  Test  for  Symmetric  Distributions 


Lambda  ( = 0.14  for  Normal  Distribution) 

(-1.0  for  Cauchy,  0.0  for  Logistic,  1 .0  for  Uniform  ) 
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DATAPLOT  Code  - Continuation  Sheet 


STATTESL.DP  (version  92-04-10,  For>9  & FiUiben,  Revision  0) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  ASTM_1CL.DAT  Y 

READ  A:ASTM_FCG.DAT  Y 

LET  N = NUMBER  Y 

TITLE  TLCOUKEY  UC( )LLC( )AMB0A  UCOTLCOEST 
TITLE  SIZE  3.5 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA  

3.  COMPUTATION  

4.  TITLE  COMMANDS  

FOR  UCOSLCOYMMETRIC  UCOOLCOISTRIBUTIONS 

5.  LEGEND  COMMANDS  


LEGEND  1 1974  SAE  FLCOATIGUE  UCC  )CLC(  IRACK  UC(  )GLC(  )ROWTH  UCORLCOATE  UCOOLCOATA  ( UC(  )FLC(  )ONG-UC(  )OLCOOWLING,  1981  ) 
LEGEND  2 RLCOEF.:  A:\UCOSTATTESL.DP  (J.  FLCOONG,  UCONIST,  4-10-92) 

LEGEND  3 SLCOAMPLE  UCOSLCOIZE  = *N  UC( )CLC( )0MF>UTED  UCOPPCC  = 

LEGEND  4 NLCOOTE:  UCOMLCOIN.  UCOPPCC  LCOFOR  UCONLCOORMAL  UC(  )DLCO  ISTRIB.  = 0.926  AT  9SX  UCOCLCOONFIDENCE 

LEGEND  5 CLCOONCLUSION:  UCONLCOORMALITY  HYPOTHESIS UCOFAILS 


6.  GRAPHICS  COMMANDS  

7.  LABEL  COWIANDS  

Y1LABEL  PLCOROBAB.  UCOPLCOLOT  UC()CLC()ORREL.  UC( )CLC( )OEFF . ( UCOPPCC  ) 

Y1LABEL  SIZE  3 
Y1LABEL  DISPLACEMENT  5 

Y1LIMITS  0.8  1.0 

XLIMITS  -2  2 

X1LABEL  LLCOAMBDA  ( =0.14  FOR  UCONLCOORMAL  UCODLCO ISTRIBUTION) 

X3LABEL  ( - 1.0  LCOFOR  UCOCLCOAUCHY,  0.0  FOR  UCOLLCOOGISTIC,  1.0  FOR  UCOULCONI FORM  ) 
XI LABEL  SIZE  3 
X3LABEL  SIZE  2.5 

8.  PLOT  COFBIANOS 

PPCC  PLOT  Y 

LET  A1  = YPL0T(22) 

LET  A2  = YPL0T(23) 

LET  A3  = 0.4*A1  + 0.6*A2 
JUSTIFICATION  LEFT 
MOVE  55  76 
TEXT  "A3 

9.  CLOSURE  COMMANDS  

PAUSE 

ER 

EXIT 

END  OF  STATTESL.DP  


156 


Fong,  Bernstein  & Filliben  (1992)  on  "PDA;  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data' 


DATAPLOT  Code  - Continuation  Sheet 


Note  to  Reader:  The  following  is  a listing  of  the  data 
file  ASTM_1Cl..DAT,  which  is  also  stored 
as  a backup  named  ASTM_FCG.DAT: 


3.535 

3.038 

3.038 

3.218 

3.218 

3.263 

3.263 

3.014 

3.014 

3.535 

3.760 

4.221 
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TECHNOMETRICSC,  VOL  17,  NO.  1,  FEBRUARY  1975 


The  Probability  Plot  Correlation  Coefficient  Test 
for  Normality 


James  J.  Filliben 


National  Bureau  of  Standards 
Statistical  Engineering  Laboratory 
U.S.  Department  of  Commerce 
Washington,  D.C.  20234 


This  paper  iittrodnce.s  the  normal  pnjhabilily  plot  correlation  coefficient  as  a test 
.statistic  in  complete  samples  for  the  composite  hypothesis  of  normality.  The  proposed 
test  statistic  is  conceptually  simple,  is  computationally  convenient,  and  is  readily 
extendible  to  testing  non-normal  distributional  hypotheses.  An  empirical  power  study 
shows  that  the  normal  probability  plot  correlation  coefficient  compares  favorably  with 
7 other  normal  test  statistics.  Percent  points  are  tabulated  for  n = .ff  1 ).')0(.'))100. 


Tahlk  1 — Percent  points  of  the  normal  probability  plot  correlation  coefficunt  r 

Level 


n 

.000 

.005 

.01 

.025 

.05 

. 10 

.25 

. 50 

3 

.366 

.86  7 

. 869 

. 872 

.879 

. 891 

.924 

.966 

4 

. 784 

. 813 

. 822 

.845 

.868 

. 894 

.931 

.958 

5 

. 726 

. 803 

.822 

.855 

.879 

.902 

.935 

.960 

6 

.683 

. 818 

. 835 

.868 

. 890 

.911 

.940 

.962 

7 

.648 

.828 

.847 

.876 

.899 

.916 

.944 

.965 

8 

.619 

.841 

.859 

.886 

.905 

. 924 

,948 

.967 

9 

. 595 

. 851 

.868 

.893 

.912 

.929 

.951 

.968 

10 

.574 

. 860 

.876 

.900 

.917 

.934 

.954 

.970 

11 

.556 

. 868 

.883 

.906 

.922 

.938 

.957 

.972 

12 

.539 

.875 

.889 

.912 

.926 

.941 

.959 

.973 

13 

.525 

. 882 

.895 

.917 

.931 

.944 

.962 

.975 

14 

.512 

.888 

.901 

.921 

.934 

.947 

.964 

.976 

15 

.500 

.894 

.907 

.925 

.937 

.950 

.965 

.977 
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Tahlk  1 — Percent  points  of  the  normal  probability  plot  correlation  coefficient  r 

Level 


n 

^000 

.005 

.01 

.025 

.05 

. 10 

.25 

. 50 

16 

.489 

. 899 

.912 

.928 

.940 

.952 

.967 

.978 

17 

. 478 

.903 

.916 

.931 

.942 

. -^54 

.968 

.9  79 

18 

.469 

.907 

.919 

.934 

. 945 

.956 

.969 

.979 

19 

.460 

.909 

.923 

.937 

.947 

. 958 

.971 

.980 

1 20  1 

.452 

.912 

.925 

.939 

.950 

~\  . 960 

.972 

.961 

21 

. 445 

.914 

.928 

.942 

. 952 

. 961 

.973 

. 981 

22 

.437 

.918 

.9  30 

.944 

.954 

.962 

.974 

. 982 

23 

.431 

.922 

.933 

.947 

.955 

. 964 

.975 

.983 

24 

. 424 

.926 

.9  36 

. 949 

. 957 

.965 

.975 

.983 

25 

. 4id 

.928 

.937 

.950 

.958 

. 966 

.976 

.984 

26 

.412 

.9  30 

.939 

.952 

.959 

.967 

.977 

. 984 

27 

. 407 

.9  32 

.941 

.953 

.960 

.968 

.977 

.984 

28 

. 402 

.9  34 

.943 

.955 

.962 

.969 

.978 

. 985 

29 

. 397 

.937 

.94  5 

.956 

.962 

.969 

.979 

.985 

30 

. 392 

.938 

.947 

.957 

.964 

.970 

.979 

. 986 

31 

. 388 

.9  39 

.948 

.958 

.965 

.971 

.980 

.986 

32 

. 383 

.9  39 

.949 

.959 

.966 

.972 

.980 

.986 

33 

. 379 

. 940 

.950 

.960 

.967 

.973 

.981 

.987 

34 

.375 

.941 

.951 

.960 

.967 

.973 

.981 

.987 

35 

.371 

.943 

.952 

.961 

.968 

.974 

.982 

.987 

36 

. 36  7 

.945 

.953 

.962 

.968 

.974 

.982 

.987 

37 

. 364 

. 947 

.955 

.962 

.969 

.975 

.982 

.988 

38 

. 360 

.948 

.956 

.964 

.970 

.975 

.983 

.988 

39 

. 357 

.949 

.957 

.965 

.971 

.976 

.983 

.988 

40 

. 354 

.949 

.958 

.966 

.972 

.977 

. 983 

.988 

41 

. 351 

.950 

.958 

.967 

.972 

.977 

.984 

.989 

42 

. 348 

.951 

.959 

.967 

.973 

.978 

.984 

.989 

43 

. 345 

.953 

.959 

.967 

.973 

.978 

.984 

.989 

44 

. 342 

.954 

.960 

.968 

.973 

.978 

.984 

.989 

45 

. 339 

.955 

.961 

.969 

.974 

.978 

.985 

.989 

46 

.3  36 

.956 

.962 

.969 

.974 

.979 

.985 

.990 

47 

. 334 

.956 

.963 

.9  70 

.974 

.979 

.985 

.990 

48 

. 331 

.957 

.963 

.970 

.975 

.980 

.985 

.990 

49 

. 329 

.957 

.964 

.971 

.975 

.980 

.986 

.990 

50 

.326 

.959 

.965 

.972 

.977 

.981 

.986 

.990 

55 

. 315 

.962 

.967 

.974 

.978 

.982 

.987 

.991 

60 

. 305 

.965 

.970 

.976 

.980 

. 983 

.988 

.991 

65 

.296 

.967 

.972 

.977 

.981 

.984 

.989 

.992 

70 

.288 

.969 

.974 

.978 

. 982 

.985 

.989 

.99  3 

75 

.281 

.971 

.975 

.979 

.983 

.986 

.990 

.993 

80 

. 274 

.973 

.976 

.980 

.984 

.987 

.991 

.99  3 

85 

.268 

.9  74 

.977 

.981 

.985 

.987 

.991 

.994 

90 

.263 

.976 

.978 

.982 

.985 

.988 

.991 

.994 

95 

.257 

.977 

.979 

.983 

.986 

.989 

.992 

. 994 

100 

.252 

.979 

.981 

.984 

.987 

.989 

.992 

.994 
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Lambda  Test-2  (Data  File:  ASTM_1CL.DAT) 


Subroutine  Name:  STATTESL.DP2  Ref.:  pda-dp2.5cl 


Tukey  Lambda  Test  for  Symmetric  Distributions 


Fictitious  Data  Randomly  Generated  from  a Univariate  Normal  Distribution 


Lambda  ( = 0.14  for  Normal  Distribution) 

(-1.0  for  Cauchy,  0.0  for  Logistic,  1 .0  for  Uniform  ) 
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DATAPLOT  Code  - Continuation  Sheet 


STATTESL.DP2  (version  92-04-11,  Fong  & Filliben,  Revision  0) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  ASTM_1CL.DAT  Y 

READ  A:ASTM_RND.DAT  Y 

LET  N = NUMBER  Y 

TITLE  TLCOUKEY  UC(  )LLC()AMBDA  UC()TLC()EST 
TITLE  SIZE  3.5 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA  

3.  COMPUTATION  

4.  TITLE  COMMANDS  

FOR  UCOSLCOYMMETRIC  UC()DLC()ISTRIBUTIONS 

5.  LEGEND  COMMANDS  


LEGEND  1 DATAPLOT  MLCOACRO:  A:\UC( )STATTESL.DP2  ( J.  FLCOONG,  UCONIST,  4-11-92  ) 

6.  GRAPHICS  COMMANDS  

7.  LABEL  COMMANDS  

Y1LABEL  PLCOROBAB.  UC()PLC()LOT  UC(  )CLC()ORREL.  UC(  )CLC()OEFF . ( UCOPPCC  ) 

Y1LABEL  SIZE  3 
Y1LABEL  DISPLACEMENT  5 


Y1LIMITS  0.8  1.0 


XLIMITS  -2  2 

X1LABEL  LLCOAMBDA  ( = 0.14  FOR  UC( )NLC( )ORMAL  UC()DLC()ISTRIBUTION) 

X3LABEL  ( - 1.0  LC()FOR  UC( )CLC()AUCHY,  0.0  FOR  UC()LLC( )OGISTIC,  1.0  FOR  UC( )ULC( )NI FORM  ) 

X1LABEL  SIZE  3 
X3LABEL  SIZE  2.5 

8.  PLOT  COMMANDS  

PPCC  PLOT  Y 
JUSTIFICATION  CENTER 
MOVE  50  92 

TEXT  FLCOICTITIOUS  UCOOLCOATA  UC(  )RLC(  )ANOOMLY  UC(  )GLCOENERATED  FROM  A UC(  )ULCONI  VAR  I ATE  UC(  )MLC(  )ORMAL  UC(  )0LC( ) ISTR IBUT  lOR 

JUSTIFICATION  LEFT 
MOVE  45  60 

TEXT  SLCOAMPLE  UC()SLC()IZE  = ^N 
MOVE  45  54 

TEXT  CLCOOMPUTED  UCOPPCC  = 

LET  A1  = YPLOT(22) 

LET  A2  = YPLOT(23) 

LET  A3  = 0.4*A1  + 0.6*A2 
MOVE  60  54 
TEXT  ^A3 
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DATAPLOT  Code  - Continuation  Sheet 


MOVE  45  48 

TEXT  ( MLCOIN,  UCOPPCC  LC()FLC()OR  UC()NLC( )ORMAL  UC( )DLC( ) ISTRIB.  = 
MOVE  55  44 

TEXT  0.950  LCOAT  95%  UC(  )CLC(  )0NF1DENCE  ) 

MOVE  45  38 

TEXT  CLCOONCLUSION:  UCONLCC  )0RMALITY  HYPOTHESIS UCOHOLDS 

9.  CLOSURE  COMMANDS 

PAUSE 

ER 

EXIT 

END  OF  STATTESL.DP2 

Note  to  Reader:  The  following  is  a listing  of  the  data 

file  ASTM_1CL.DAT,  which  is  also  stored 
. as  a backup  named  ASTM_RND.DAT: 


89.27 
105.73 

91.27 

102.34 
95.45 
94.75 
92.94 

100.32 

111.91 

102.70 

98.51 

98.03 

97.57 

91.59 

98.96 

104.19 

102.64 

108.98 

100.34 
115.88 


Summary  4-Plot  (Ref.:  a:\STATSUM4.DP) 


so  so  70  so  90  100  110  120  130  140  150 


HISTOGRAM  Y 


Fong,  Bernstein  & Filliben  (1992)  on  'PDA:  A PC -based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data' 


Weibull  Test  (Data  File:  ASTM  1 CL. DAT) 


Subroutine  Name:  STATTFSW.DP  Ref.:  pda-dp. 5c2 


Weibull  Test  for  Unsymmetric  Distributions 


1974  SAE  Fatigue  Crack  Growth  Rate  Data  ( Fong-Oowling,  1981  ) 


163 


Fong,  Bernstein  & Filliben  (1992)  on  "PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data" 


DATAPLOT  Code  - Continuation  Sheet 


STATTESW.DP  (version  92-04-11,  Fong  & Filliben,  Revision  0) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  ASTM  1 CL. DAT  Y 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A-.ASTM  FCG.DAT  Y 


3.  COMPUTATION 


LET  N = NUMBER  Y 

4.  TITLE  COMMANDS  

TITLE  WLCOEIBULL  UC()TLC()EST  FOR  UC( )ULC()NSYMMETRIC  UC( )DLC( >ISTRIBUTIONS 
TITLE  SIZE  3.5 

5.  LEGEND  COMMANDS  

6.  GRAPHICS  COMMANDS  -- 

7.  LABEL  COMMANDS  

Y1LABEL  PLCOROBAB.  UC()PLC()LOT  UC( )CLC( )ORREL . UC()CLC( )OEFF . ( UCOPPCC  ) 

Y1LABEL  SIZE  3 
Y1LABEL  DISPLACEMENT  5 


Y1LIMITS  0.8  1.0 
XLIMITS  0 5 


XILABEL  WLCOEIBULL  UCOSLCOHAPE  UC( )PLC( )ARAMETER 
X1LABEL  SIZE  3 

8.  PLOT  COMMANDS  

LET  GAMMA1  =0.2 
LET  GAMMA2  =5.0 
WE  I BULL  PPCC  PLOT  Y 
JUSTIFICATION  CENTER 
MOVE  50  92 

TEXT  1974  SAE  FLCOATIGUE  UC( )CLC( )RACK  UC( )GLC( )ROWTH  UCORLCOATE  UCODLCOATA  ( UC( )FLC{  )0*IG-UC(  )OLCOOWLIMG,  1981  ) 


JUSTIFICATION  LEFT 
MOVE  30  40 

TEXT  DATAPLOT  MLCOACRO:  A:\UCOSTATTESW.DP  (J.  FLCOONG,  UCONIST,  4-11-92) 
MOVE  30  34 

TEXT  SLCOAMPLE  UCOSLCOIZE  = "N 

9.  CLOSURE  COMMANDS  

PAUSE 

ER 

EXIT 

END  OF  STATTESW.DP  
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Extreme  Value  Test  (Data  File:  ASTM_1CL.DAT) 


Subroutine  Name:  STATTFSX.DP  Ref.:  pda-dp. 5c3 


Extreme  Value  Test  for  Unsymmetric  Distributions 


1974  SAE  Fatigue  Crack  Growth  Rate  Data  ( Fong-Oowriing,  1981  ) 
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DATAPLOT  Code  - Continuation  Sheet 


STATTESX.DP  (version  92-04-11,  Fong  & Fiiliben,  Revision  0) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  ASTM  1CL.DAT  Y 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A:ASTM_FCG.DAT  Y 
LET  N = NUMBER  Y 


3.  COMPUTATION 


TITLE  ELCOXTREME  UC( )VLC( )ALUE  UCOTLCOEST  FOR  UC( )ULC()NSYMMETRIC  UCODLCOISTRIBUTIONS 
TITLE  SIZE  3.5 

5.  LEGEND  COMMANDS  

6.  GRAPHICS  COMMANDS  

7.  LABEL  COMMANDS  

YILABEL  PLCOROBAB.  UC()PLC()L0T  UC( )CLC( )0RREL.  UC()CLC( )OEFF.  ( UCOPPCC  ) 

Y1LABEL  SIZE  3 
YILABEL  DISPLACEMENT  5 


YILIMITS  0.8  1.0 
XLIMITS  0 20 

XI LABEL  SLCOHAPE  UC(  )PLC( )ARAMETER 
XILABEL  SIZE  3 

8.  PLOT  COMMANDS  

LET  GAMMA1  =0.2 

LET  GAMMA2  = 20 

EXTR  VALUE  TYPE  2 PPCC  PLOT  Y 

JUSTIFICATION  CENTER 

MOVE  50  92 

TEXT  1974  SAE  FLCOATIGUE  UC( )CLC( )RACK  UC( )GLC( )ROWTH  UCORLCOATE  UCOOLCOATA  ( UC( )FLC( )ONG-UC{ )DLC( )OWLIMG,  1981  ) 

JUSTIFICATION  LEFT 
MOVE  30  40 

TEXT  DATAPLOT  MLCOACRO:  A:\UC()STATTESX.DP  (J.  FLCOONG,  UCONIST,  4-11-92) 

MOVE  30  34 

TEXT  SLCOAMPLE  UCOSLCOIZE  = ^N 

9.  CLOSURE  COMMANDS  

PAUSE 

ER 

EXIT 

END  OF  STATTESX.DP  
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Box-Cox  Transformation  (Data  File:  ASTM_1CL.DAT) 


Subroutine  Name:  STATBCOX.DP  Ref:  pda-dp. 5 c4 


Box-Cox  Transf.  for  Raising  Data  to  Lambda  Power 


1974  SAE  Fatigue  Crack  Growth  Rate  Data  ( Fong-Oowiing,  1981  ) 


Lambda  Power  for  Converting  Data  to  Normal 


167 


Fong,  Bernstein  & Filliben  (1992)  on  "PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data" 


DATAPLOT  Code  - Continuation  Sheet 


STATBCOX.OP  (version  92-(K-11,  Fong  & Filliben,  Revision  0) 


FEEDBACK  OFF 

DIMENSION  100  VARIABLES 

DEFINE  ER  ESC  FF 

TIC  OFFSET  UNITS  SCREEN 

TIC  OFFSET  5 5 

CHARACTER  COLOR  BLACK  ALL 

BAR  COLOR  BLACK  ALL 

DEVICE  2 POSTSCRIPT 

WINDOW  CORNER  COORDINATES  0 0 95  95 

READ  ASTM  1 CL. DAT  Y 


1.  SYSTEM  COMMANDS 


2.  INPUT  DATA 


READ  A: ASTM_FCG.DAT  Y 
LET  N = NUMBER  Y 


3.  COMPUTATION 


TITLE  BLCOOX-UCOCLCOOX  UC()TLC( >RANSF . FOR  UC( )RLC()AISING  UC()DLC()ATA  TO  UC( )LLC( )AMBDA  UC()PLC()OWER 
TITLE  SIZE  3.5 

5.  LEGEND  COMMANDS  

6.  GRAPHICS  COMMANDS  

7.  LABEL  COMMANDS  

Y1LABEL  PLCOROBAB.  UCOPLCOLOT  UC( )CLC( )ORREL . UC( )CLC( )OEFF . ( UCOPPCC  ) 

Y1LABEL  SIZE  3 
Y1LABEL  DISPLACEMENT  5 


XI LABEL  LLCOAMBDA  UC( )PLC( )OWER  FOR  UC( )CLC( )ONVERTING  UCODLCOATA  TO  UC( )NLC( )ORMAL 
XILABEL  SIZE  3 

8.  PLOT  COMMANDS  

BOX-COX  NORMALITY  PLOT  Y 
JUSTIFICATION  CENTER 

•’OVE  50  92  , 

TEXT  1974  SAE  FLCOATIGUE  UC( )CLC()RAaC  UC( )GLC( )ROWTH  UCORLCOATE  UCODLCOATA  ( UCOFLCOONG-UCOOLCOOULING,  1981  ) 


MOVE  50  82 

TEXT  DATAPLOT  MLCOACRO:  A:\UC()STATBCOX,DP  (J.  FLCOONG,  UCONIST,  4-11-92) 
MOVE  50  75 

TEXT  SLCOAMPLE  UCOSLCOIZE  = "N 

9.  CLOSURE  COMMANDS  

PAUSE 

ER 

EXIT 

END  OF  STATBCOX.DP  
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Sect.  6.13  - Analysis  of  Variance- 1 (Data  File:  ASTM_3CL.DAT) 

In  Sect.  6.12,  we  introduced  6 macros,  STATSUM4.DP,  STATSUMT.DP, 
STATTESL.DP,  STATTESW.DP,  STATTESX.DP,  and  STATBCOX.DP  to  analyze  a 12-point 
data  set  given  by  6 laboratories  as  listed  on  p.  149.  The  first  macro,  STATSUM4.DP,  yielded 
four  plots  which  convinced  us  that  the  data  is  unlikely  to  be  normally  distributed.  The  tabulated 
results  of  the  second  macro,  STATSUMT.DP,  gave  us  on  p.  154  the  quantitative  evidence 
through  the  autocorrelation  coefficient  r,  , which,  at  0.64,  is  too  far  away  from  zero,  the  ideal 
measure  of  randomness.  Using  a macro  named  STATTESL.DP,  we  subjected  the  12-point  data 
set  to  further  scrutiny  via  the  so-called  Tukey  Lambda  test  [20,  25],  where  we  observe  on  p.  155 
that  normality  hypothesis  fails  when  the  computed  probability  plot  correlation  coefficient 
(PPCC =0.915)  is  below  the  minimum  (0.926)  tabulated  for  a sample  of  12  at  95%  confidence 
(see  p.  158)^^.  We  then  began  a search  for  the  "best-fit"  distribution  by  plotting  once  again  the 
PPCC  versus  the  shape  parameters  of  two  well-known  families  of  distributions,  namely,  the 
Weibull  (STATTESW.DP)  and  the  Extreme-Value  Type  2 (STATTESX.WP).  We  see  on  pages 
163  and  165  that  both  would  admit  valid  shape  parameters  if  the  values  of  PPCC  are  above  a 
certain  threshold  value  equal  to,  say,  0.926. 

Section  6.12  concludes  with  a macro  named  STATBCOX.DP  and  a plot  associated  with 
that  macro  where  the  values  of  PPCC  are  plotted  against  an  exponent  named  lambda.  The 
purpose  of  that  plot  is  to  select  a value  for  lambda  at  the  highest  PPCC  such  that  a 
transformation  of  the  data  set  by  raising  each  data  to  the  power  of  lambda  converts  a non-normal 
set  to  a normal  one.  This  technique  is  therefore  useful  in  modeling  non-normal  data  sets. 

In  this  section,  we  introduce  a very  brief  macro  named  STATANOV.DP  to  perform  an 
interlaboratory  data  analysis  using  a technique  known  as  ANOVA.  The  goal  of  this  analysis  is 
to  evaluate  the  between-laboratory  variance  which  is  a measure  of  the  "reproducibility"  of  a 
specific  measurement.  A complete  description  of  this  exercise  is  given  in  a paper  by  Fong  and 
Dowling  [8].  On  page  170,  we  show  the  listing  for  the  macro  and  two  data  files  named 
ASTM_LAB.DAT  and  ASTM_LB5.DAT.  The  first  one  is  the  6-laboratory,  2-specimen  data 
file  we  used  for  Section  6.12  and  reproduced  on  page  149.  The  second  data  file  is  the  same  as 
the  first  except  that  the  last  two  data  points  from  the  6th  laboratory  are  removed.  The  output 
for  the  analysis  of  variance  of  the  first  and  the  second  data  files  are  given  on  pages  171  and  172, 
respectively.  Even  though  the  replication  standard  deviations  computed  for  the  two  data  files 
are  about  the  same  (0.26256  vs.  0.24796),  the  F-test  statistics  (3.049  vs.  0.184)  and  the 
corresponding  F CDF  values  (89.642%  vs.  6.341%)  are  different.  The  main  conclusion  is  that 
there  is  indeed  a qualitative  difference  between  the  first  five  laboratories  and  the  sixth  with 
acceptable  degree  of  reproducibility  among  all  laboratories  if  the  6th  laboratory  is  left  out. 

'^For  completeness,  we  added  a macro  named  STATTESL.DP2  (pp.  160-162)  to  analyze  a 20-point  data  set 
randomly  generated  from  a univariate  normal  distribution.  As  expected,  the  computed  PPCC  (0.985)  exceeds 
the  minimum  (0.950)  shown  on  page  159,  and  the  normality  hypothesis  holds. 


169 


Fong,  Bernstein  & Filliben  (1992)  on  "PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data" 


ANOVA  (Data  File:  ASTMJCL.DAT) 


Subroutine  Name:  STATANOV.DP  Ref.:  pda-dp. 5d2 


STATANOV.DP  (version  92-04-11,  Fong  & Filliben,  Revision  0)  

1.  SYSTEM  COMMANDS  

FEEDBACK  OFF 
DIMENSION  100  VARIABLES 
DEFINE  ER  ESC  FF 
DEVICE  2 POSTSCRIPT 
CAPTURE  A:ASTM_LAB.OUT 

2.  INPUT  DATA  

READ  ASTM_3CL.DAT  XI  X2  Y 

READ  A: ASTM_LAB.DAT  XI  X2  Y 

3.  COMPUTATION  

4.  TITLE  COMMANDS  

5.  LABEL  COMMANDS  

6.  GRAPHICS  COMMANDS  

7.  LEGEND  COMMANDS  

8.  PLOT  COMMANDS  

ANOVA  Y XI 

9.  CLOSURE  COMMANDS  

END  OF  CAPTURE 

PAUSE 

ER 

EXIT 

END  OF  STATANOV.DP  

Note  to  Reader:  The  following  is  a listing  of  the  data 

file  ASTM_3CL.DAT,  which  is  also  stored 

in  two  backups,  one  named  ASTM_LAB.DAT  for 

a 6- lab  data  set,  arxJ  the  other  named  ASTM_LB5.DAT 

for  a 5- lab  data  set  after  the  data  for  6th  lab  were  removed: 

ASTM  LAB. DAT  ASTM  LBS. DAT 


1 

1 

3.535 

1 

1 

3.535 

1 

2 

3.038 

1 

2 

3.038 

2 

1 

3.038 

2 

1 

3.038 

2 

2 

3.218 

2 

2 

3.218 

3 

1 

3.218 

3 

1 

3.218 

3 

2 

3.263 

3 

2 

3.263 

4 

1 

3.263 

4 

1 

3.263 

4 

2 

3.014 

4 

2 

3.014 

5 

1 

3.014 

5 

1 

3.014 

5 

2 

3.535 

5 

2 

3.535 

6 

1 

3.760 

6 

2 

4.221 
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DATAPLOT  Code  - Continuation  Sheet 


**  1-WAY  ANALYSIS  OF  VARIANCE  ** 
*********************************** 

********************************** 


NUMBER  OF  OBSERVATIONS 

= 

12 

NUMBER  OF  FACTORS 

= 

1 

NUMBER  OF  LEVELS  FOR  FACTOR  1 

= 

6 

RESIDUAL  STANDARD  DEVIATION 

= 

0.26258280873E+00 

RESIDUAL  DEGREES  OF  FREEDOM 

= 

6 

REPLICATION  CASE 

REPLICATION  STANDARD  DEVIATION 

0.26258280873E+00 

REPLICATION  DEGREES  OF  FREEDOM 

= 

6 

NUMBER  OF  DISTINCT  CELLS 

s 

6 

* ESTIMATION 

* 

**«<************* 

GRAND  MEAN 

= 

0.33430833817E+01 

GRAND  STANDARD  DEVIATION 

= 

0.364951 19333E+00 

LEVEL-ID 

NI 

MEAN 

EFFECT 

SD(EFFECT) 

FACTOR  1--  1.00000 

2. 

3.28650 

-0.05658 

0.16950 

2.00000 

2. 

3.12800 

-0.21508 

0.16950 

3.00000 

2. 

3.24050 

-0.10258 

0.16950 

4.00000 

2. 

3.13850 

-0.20458 

0.16950 

5.00000 

2. 

3.27450 

-0.06858 

0.16950 

6.00000 

2. 

3.99050 

0.64742 

0.16950 

MODEL 

RESIDUAL  STANDARD  DEVIATION 

CONSTANT  ONLY--  0.3649511933 

CONSTANT  & FACTOR  1 ONLY--  0.2625828087 


* TESTING  * 


NUM.  LEVELS  F STAT.  F CDF 


FACTOR  1--  6 3.04971241951  89.642% 


RESIDUAL  STANDARD  DEVIATION  = 
RESIDUAL  DEGREES  OF  FREEDOM  = 
REPLICATION  STANDARD  DEVIATION  = 
REPLICATION  DEGREES  OF  FREEDOM  = 


0.26258280873 

6 

0.26258280873 

6 
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DATAPLOT  Code  - Continuation  Sheet 


********************************** 
★ ★★**************rilr******»*****w*** 

**  1-WAY  ANALYSIS  OF  VARIANCE  ** 
********************************** 
*******♦★*****♦*★*★♦*****♦♦******* 


NUMBER  OF  OBSERVATIONS 
NUMBER  OF  FACTORS 
NUMBER  OF  LEVELS  FOR  FACTOR  1 
RESIDUAL  STANDARD  DEVIATION 

RESIDUAL  DEGREES  OF  FREEDOM 

REPLICATION  CASE 
REPLICATION  STANDARD  DEVIATION 
REPLICATION  DEGREES  OF  FREEDOM 
NUMBER  OF  DISTINCT  CELLS 


10 

1 

5 

0.24796687067E+00 

5 

0.24796687067E+00 

5 

5 


★ Sr************** 

* ESTIMATION  * 

•kitititicititit'kifkit'k'kit'k 


GRAND  MEAN  = 0.32136001587E+01 

GRAND  STANDARD  DEVIATION  = 0. 19800846279E+00 


LEVEL- ID 

NI 

MEAN 

EFFECT 

SD(EFFECT) 

FACTOR  1--  1.00000 

2. 

3.28650 

0.07290 

0.15683 

2.00000 

2. 

3.12800 

-0.08560 

0.15683 

3.00000 

2. 

3.24050 

0.02690 

0.15683 

4.00000 

2. 

3.13850 

-0.07510 

0.15683 

5.00000 

2. 

3.27450 

0.06090 

0.15683 

MODEL 

RESIDUAL  STANDARD  DEVIATION 

CONSTANT  ONLY--  0.1980084628 

CONSTANT  & FACTOR  1 ONLY--  0.2479668707 


************* 

* TESTING  * 
************* 


NUM.  LEVELS  F STAT.  F CDF 


FACTOR  1--  5 0.18470549583  6.341% 


RESIDUAL  STANDARD  DEVIATION  = 
RESIDUAL  DEGREES  OF  FREEDOM  = 
REPLICATION  STANDARD  DEVIATION  = 
REPLICATION  DEGREES  OF  FREEDOM  = 


0.24796687067 

5 

0.24796687067 

5 
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Sect.  6.14  - Statistical  Distribution- 1 (Data  File:  ASTM  1CL.DAT) 


Before  we  discuss  the  last  tutorial  of  this  chapter,  let  us  summarize  Sect.  6.1-6.13: 


Section 

Name  of  Macro 

Name  of  DATAPLOT  Command 

No. 

Subtotal 

6.1 

DOEHISTO.DP 

(See  p.  102.) 

24 

24 

6.2 

DOEPIECH.DP 

(See  p.  106.) 

20 

44 

6.3 

DOEPARET.DP 

(See  p.  111.) 

9 

53 

6.4 

DOEP4Q7F.DP 

(See  p.  115.) 

3 

56 

6.5 

IXIEPLOTF.DP 

(Seep.  119.) 

5 

61 

6.6 

DOECCC.DP 

SPIKE 

1 

62 

6.7 

DOEPCC.DP 

0 

62 

6.8 

DOELAG.DP 

...  LAG  PLOT 

1 

63 

6.9 

DOEAUTO.DP 

(Seep.  119.) 

2 

65 

6.10 

DOEPREDl.DP 

(See  p.  119.) 

2 

67 

6.11 

DOEPRED2.DP 

(Seep.  119.) 

2 

69 

6.12 

STATSUM4.DP  (p.  150) 

4-PLOT  AUTOMATIC 

2 

71 

STATSUMT.DP  (p.  153) 

CAPTURE  END  OF  CAPTURE 

SUMMARY 

3 

74 

STATTESL.DP(p.  156) 
STATTESL.DP2  (p.  161) 
STATTESW.DP  (p.  164) 
STATTESX.DP(p.  166) 

...  PPCC  PLOT 

1 

75 

STATBCOX.DP(p.  168) 

BOX-COX  NORMALITY  PLOT 

1 

76 

6.13 

STATANOV.DP(p.  170) 

ANOVA 

1 

77 

In  this  section,  we  introduce  five  more  macros  and  8 more  commands  to  bring  to  a conclusion 
an  exploratory  data  analysis  of  a 12-point  data  set  first  introduced  in  Section  6.12  with  the 
filenames  of  ASTM_1CL.DAT  or  ASTM_FCG.DAT  (see  page  150)  and  renamed 
ASTM_LC6.DAT  for  the  two  new  macros  listed  below  and  the  output  on  pp.  174-177: 

Sect.  6.14  DISTNORM.DP  (test  fails)  CHSPPF(P,NU)  NORPDF(x)  2 79 

DISTNORM.DP5  (test  passes)  0 79 

DISTWEIB.DP  CORRELATION  ...  PROBABILITY  PLOT 

DISTWEIB.G09  (Gamma =0.9)  SORT  UNIFORM  ORDER  ST  AT  MEDIAN 
DISTWEIB.G13  (Gamma=1.3)  WEIPDF(X,  GAMMA)  WEIPPF(P,  GAMMA)  6 85 

Two  of  the  85  commands  deserve  special  mention.  They  are  "...  PPCC  PLOT",  which  can 
handle  9,  and  "...  PROBABILITY  PLOT",  which  can  handle  24  distributions  as  listed  below: 

"...  PPCC  PLOT"  Chi-Squared;  Extr  Value  Type  2;  Gamma;  Geometric;  Pareto;  Poisson;  T;  Tukey  Lambda  (default);  Weibull. 

"...  PROBABILITY  PLOT"  Beta;  Binomial;  Cauchy;  Chi-Squared;  Double-Exponential;  Exponential;  Extr  Value  Type  1; 

Extr  Value  Type  2;  F;  Gartuna;  Geometric;  Half  Normal;  Logistic;  Lognormal;  Negative  Binomial; 
Normal;  Pareto;  Poisson;  Semicircular;  T;  Triangular;  Tukey  Lambda;  Uniform;  Weibull. 
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Tukey  Lambda  Test  for  Symmetric  Distributions 


Modiflad  6-tab  Fatigua  Crack  Growth  Rata  Data  ( 1974  SAE  Program,  Fong  • Dowling,  1981  ) 


Lambda  ( = 0.1 4 for  Normal  Distribution) 


Relative  Histogram  & Normal  Distribution  Fit 

Modifiad  6-lab  Fatigua  Crack  Growth  Rata  Data  ( 1974  SAE  Program,  Fong  - Dowling,  1961  ) 


0.5  — 


0.4 


0.2  - 


0.1 


0 


DATAPLOT  Macro.:  a:  \ DISTNORM.DP  ( Fong-Hlllban,  NIST,  5-30-92 ) 
DataFlla:  c:\DATAPLOT\ASTM_LC6.DAT  Samplaalza  > 12. 


Taal  for  Randomnaaa  : 


Autocorr.  Coaff.  R1  = 0.643556 

Conclusion:  Randomnass 
hypothasis  ..FAILS 
at  95%  confidanca. 

Taal  for  Normality  : 

PPCC  Computad  = 0.915232  . 

Min.  PPCC  to  Paaa  = 0.926  . 

Conclusion:  Normality 
hypothesis  ..FAILS 
at  95%  confidence. 


Paramster  Estimation : 


Sample  Mean  = 3.343064. 

Sample  S.D.  = 0J64952  . 

Std.  Dev.  of  the  Mean  < 0.105353  . 
Std.  Dav.  of  the  SD  > 0.071324 

95%  Confidence  imarvals  : | 

Sample  Mean  : 

(3.111206  , 3.574962) 

Sample  S.D.  : 

(025653  , 0.619643) 


Slope  of  da/dn  vs.  delta-K  Curve 
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Normal  Probability  Plot 


3.5  - 


Sampla  Size  N = 12  . 
AUTOCORRELATION  R1  = 0.643556. 


• • 


• • 


• • 


• • 


• • 


Weibull  Probability  Plot  Correlation  Coefficient 
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5 — 


Weibull  Probability  Plot 


Samplo  SIza  N = 12. 
GAMMA  = 0.9 . 

WEIBULL  PPCC  = 0.990258  . 


• • 


• • 


• • 


Relative  Histogram  & Weibull  Distribution  Fit 

Modiflad  6-<ab  Fatigua  Crack  Growth  Rata  Data  ( 1974  SAE  Program,  Fong  • Oowling,  1981  ) 


0.5  - 


0.4  - 


0.3  - 


0.2  - 


0.1  — 


DATAPLOT  Macro:  a:  \ DISTWEI8.0P  ( J.  Fong,  NIST,  5-30-92  ) 
Data  Rla:  c:  \ DATAPLOT  \ ASTM_LC6.0AT 
SamplaSIza  = 12.  Shape  Factor  GAMMA  = 0.9. 

Weibull  Fit  Parametara:  a = 2.5  . b = 1.459805. 


Slope  of  da/dn  vs.  delta>K  Curve 
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Weibull  Probability  Plot 


5 - 


3.5  — 


3 — 


Sampla  Sin  N = 12  . 
GAMMA  = 1.3  . 

WEIBULL  PPCC  = 0.978759  . 


• • 


• • 


t f 


• • • • 


0.5 


1.5 


2.5 


Relative  Histogram  & Weibull  Distribution  Fit 

Modiflad  6-lab  Fatigua  Crack  Growtti  Rata  Data  ( 1974  SAE  Program,  Fong  • Dowling,  1981  ) 


0.2  — 


0.1  — 


DATAPLOr  Macro:  a:  \ DISTWEIB.DP  ( J.  Fong,  NIST,  5-30-92 ) 

DaU  Flla:  c:  \ DATAPLOT  \ ASTM_LC6.DAT 

Sampla  Sin  = 12.  Shapa  Factor  GAMMA  = 1.3. 

Walbull  Fit  Paramatara:  a = 2.5  . b = 1.459805. 


2 3 4 5 

Slope  of  da/dn  vs.  delta-K  Curve 
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Chapter  7 - Significance  & Limitations  of  PDA  (v.  92.2) 

As  originally  agreed  between  NIST  and  the  DOE  Office  of  Nuclear  Safety  Self- 
Assessment  in  a procurement  request  dated  Sep.  30,  1991,  an  expert  system  named  PDA  (v. 
92.2)  with  a single-stroke  access  to  a powerful  data  analysis  paclage  named  DATAPLOT  (v. 
92.2)  was  developed  by  Feb.  1992  and  delivered  to  DOE  on  a floppy  diskette  named 
92330FONG-1  (see  listing  in  Appendix  A). 

As  part  of  the  agreement,  we  also  made  several  visits  in  March  1992  to  the  Germantown 
office  of  DOE  to  install  and  test  a copy  of  DATAPLOT  in  the  drive  "C"  of  a desktop  PC  to 
make  sure  that  the  system  PDA  will  properly  run  when  inserted  in  the  floppy  drive  "A".  During 
April,  1992,  several  preliminary  drafts  of  this  report  including  33  tutorial  sections  in  Chapters 
4,  5,  and  6 were  submitted  to  DOE  for  comments  with  the  final  draft  being  reviewed  by  both 
DOE  and  NIST  for  public  release. 

The  purpose  of  this  chapter  is  to  discuss  the  significance  and  the  limitations  of  the  Phase- 
1 implementation  of  the  expert  system  PDA.  With  a design  philosophy  to  reduce  as  much  as 
possible  the  initial  get-acquainted  time  between  a user  and  a command-driven  analysis  package 
such  as  DATAPLOT,  we  have  developed  PDA  as  a menu-driven  front-end  not  only  as  a 
workhorse  for  analysis  and  graphics  but  also  as  a desktop  "instructor"  for  either  an  entry-level 
or  a refresher  course  on  three  distinct  topics,  namely. 


Tonic  1 

Exploratory  Data  Analysis. 

Tonic  2 

Applied  Statistics. 

Tonic  3 

Expert  Systems. 

Within  hours,  if  not  minutes,  from  inserting  the  floppy  92330FONG-1  into  drive  "A",  a user 
could  learn  how  to  prepare  datafiles,  generate  charts,  and  conduct  exploratory  data  analysis 
(Topic  1)  without  knowing  anything  about  DATAPLOT  or  micro-PROLOG.  After  the  user 
becomes  comfortable  with  the  menu-driven  system  PDA,  he  or  she  is  encouraged  to  learn  Topic 
2 by  studying  how  to  code  in  DATAPLOT  using  Appendix  C for  the  command  index  and 
Chapter  6 for  the  listings  of  20  macros.  Finally,  when  the  user  is  proficient  in  both  PDA  and 
DATAPLOT,  he  or  she  may  be  interested  in  developing  or  modifying  an  expert  system  such  as 
PDA  (Topic  3)  by  studying  the  Prolog  source  code  in  Appendix  B with  the  help  of  a Prolog 
manual  [38].  In  short,  the  system  PDA  (v.  92.2)  as  implemented  for  Phase  1 is  capable  of 
assisting  DOE  staff  or  the  general  public  far  beyond  what  was  originally  intended  in  the  goal 
statements  of  the  DOE  procurement  request. 
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As  Stated  in  Chapter  3,  the  primary  goal  of  the  present  version  of  PDA  is  to  acquaint 
DOE  staff  with  the  analysis  and  graphics  capability  of  DATAPLOT.  A full  implementation  of 
the  design  with  20  programming  features  is  beyond  the  time  frame  of  the  DOE  procurement 
request.  Consequently,  the  present  version  of  PDA  has  four  specific  limitations  that  need  to  be 
addressed  during  the  second  and  third  phases  of  the  implementation.  The  four  shortcomings  are: 


Shortcoming  1 

Shortcoming  2 

Shortcoming  3 

Shortcoming  4 


Obsolescence  of  micro-PROLOG  Version  1.4. 

Flat,  i.e.,  Non-Modular  Structure  of  the  micro-PROLOG  Code. 

Incomplete  Implementation  of  the  Analysis  Option,  i.e.,  only  20 
of  the  40  DATAPLOT  macros  were  implement^  in  PDA  (v.  92.2). 

Lack  of  an  Application-Specific  Analysis  Help  Module. 


The  first  shortcoming  can  be  eliminated  by  a code  conversion  effort  from  micro- 
PROLOG  (v.  1.4)  to  DOS  Prolog  (v.  3.0).  The  second  is  more  basic,  but  is  equally  important 
because  as  the  Prolog  code  becomes  larger  (say,  more  than  2,000  lines),  it  would  be  more  cost- 
effective  to  maintain  the  code  if  it  is  modular.  The  third  short(X)ming  needs  to  be  taken  care  of 
as  soon  as  possible  if  PDA  is  to  graduate  from  a prototype  to  a fully-operational  version.  The 
elimination  of  all  three  has  been  recommended  by  the  authors  as  the  primary  goal  during  the 
Phase  2 implementation  of  the  expert  system  design. 


Shortcoming  4 presents  a different  story.  In  principle,  every  data  analysis  expert  system 
should  include  an  application-specific  help  module  to  assist  a user  in  interpreting  the  results  of 
his  or  her  exploratory,  exhaustive,  and  confirmatory  data  analyses.  However,  the  design  and 
implementation  of  such  a module  is  meaningful  only  if  the  requirements  of  the  application  are 
well  understood.  Since  the  DOE  PI  Program  was  only  initiated  in  1991  and  is  currently 
undergoing  a learning  period  where  some  of  its  goals  and  requirements  may  change  from  the 
reporting  experience  of  the  DOE  facilities  and  contractors,  we  recommend  that  the  task  of 
eliminating  Shortcoming  4 be  undertaken  during  the  third  and  final  phase  of  the  implementation 
of  PDA.  To  put  it  in  another  way.  Shortcoming  4 is  not  a deficiency  of  PDA  (v.  92.2),  but  a 
projected  goal  of  a future  version  of  PDA  after  the  DOE  PI  Program  settles  down  to  a well- 
defined  application. 
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Chapter  8 - Concluding  Remarks 

As  we  complete  a short-term  computational  and  analysis  consulting  assignment  for  the 
U.  S.  Department  of  Energy  (DOE)  with  a by-product  in  the  form  of  a software  code  that  is 
useful  to  DOE  as  well  as  to  a certain  segment  of  the  technical  community,  we  are  obliged  to 
answer  three  additional  questions  that  seem  natural  to  the  solution  on  hand: 

Question  4 What’s  new  in  this  software  code,  i.e.,  PDA  (v.  92.2)? 

Question  5 Did  the  development  of  this  code  depend  significantly  on  some  past 
and  on-going  research  at  NIST? 

Question  6 How  does  the  code  benefit  people  beyond  DQE? 

To  answer  Question  4,  we  recall  that  in  Chapter  3,  pp.  8-9,  the  code  PDA  (v.  92.2)  differs  from 
two  previous  systems  [11,  12]  by  incorporating  seven  new  features,  six  of  which  are  related  to 
the  application  of  DATAPLQT  to  the  DQE  PI  Program.  As  a front  end  to  a powerful  12-MB 
Fortran-77  executable  file  named  DATAPLQT.EXE,  the  menu-driven  PDA  allows  a user  the 
luxury  of  a single-stroke  execution  of  a large  number  of  analysis  macros  written  in  DATAPLQT. 
Apart  from  this  exciting  and  user-friendly  feature  in  performing  data  analysis  and  generating 
report-quality  graphics,  the  system  PDA  can  also  serve  as  a desktop  "instructor”  on  data  analysis 
and  applied  statistics  through  the  use  of  the  example-driven  tutorials. 

Question  5 is  relatively  easy  to  answer.  As  described  in  Chapters  1 and  2,  the 
development  of  PDA  depends  significantly  on  the  past  and  on-going  research  of  two  of  us  at 
NIST  and  the  third  at  the  Illinois  Institute  of  Technology.  Without  the  results  of  our  past  and 
present  research  reported  during  the  last  two  decades,  it  would  not  be  possible  to  develop  the 
system  PDA  within  the  time  frame  specified  in  the  DQE  Sep.  30,  1991  procurement  request. 

Finally,  we  wish  to  answer  Question  6 in  the  affirmative  with  three  short  remarks: 


Remark  6-1  To  another  government  agency  having  a performance-based  management  or 
quality-assurance  program  involving  public  safety  and  requiring  exhaustive  data 
analysis,  PDA  may  serve  as  a reference  model  for  a similar  development. 


Remark  6-2  To  a practicing  engineer  or  scientist,  PDA  and  DATAPLQT  offer  a state-of-the- 
art  tool  for  data  analysis  and  a built-in  tutorial  on  data  analysis  and  statistics. 

Remark  6-3  To  students  and  faculty  at  engineering  schools,  PDA  and  DATAPLQT  provide 
an  instructional  aid  in  data  analysis,  experimental  design,  and  statistical  process 
control. 
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Appendix  A 


Listing  of  NIST  Diskette 

92330FONG-1 

and 

Note  on  Availability 

The  diskette  92330FONG-1  is  available  on  a loan  basis  (see  Loan  Agreement  on  the  next 
page)  to  any  participant  of  an  expert  system  tutorial  conducted  by  Jeffrey  T.  Fong,  P.E., 
of  the  U.  S.  National  Institute  of  Standards  & Technology,  Gaithersburg,  MD.  The 
diskette  contains  an  ascii  file  named  PDA.LCXJ  which  is  written  in  Micro-Prolog  (v.  1.4) 
and  is  the  source  code  for  an  expert  system  named  PDA.  The  execution  of  the  system 
PDA  requires  an  access  to  six  proprietary  files  copyrighted  by  Logical  Programming 
Associates  (LPA),  Ltd.,  London,  U.K.  Pending  written  permission  from  LPA,  the 
duplication  of  this  diskette  is  not  permitted  by  law.  Please  return  the  loan  diskette  by  the 
date  indicated  on  the  Loan  Agreement  to:  Dr.  Jeffrey  T.  Fong,  P.E.,  Mail  Code 
A238/101,  NIST,  Gaithersburg,  MD  20899  U.S.A.  (Tel.  301-975-2720;  975-2128  fax). 
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Loan  Request  Form 

for  a 

Tutorial  Diskette  named  92330FONG-1 

Date: 

Dr.  Jeffrey  T.  Fong 

National  Inst,  of  Standards  & Technology 
Room  A238,  Bldg.  101 
Gaithersburg,  MD  20899 

Dear  Dr.  Fong: 

I attended  an  Expert  System  Tutorial  entitled  "An  Introduction  to 
Engineering  Statistical  Analysis  using  a PC-based  Software  named 

DATAPLOT"  on  , 19  , and  I saw  a 

demonstration  of  an  expert  system  named  PDA. 

I understand  that  the  tutorial  diskette  named  92330FONG-1  contains 
six  proprietary  software  codes  copyrighted  by  the  Logical 
Programming  Associates  (LPA),  Ltd.,  London,  U.K.,  and  that 
pending  a written  permission  from  LPA,  the  duplication  of  this 
diskette  is  not  permitted  by  law. 

I am,  however,  interested  in  receiving  a loan  copy  of  this  diskette  for 
learning  purposes,  and  if  my  request  is  granted,  1 agree  to  abide  by 
the  copyright  protection  laws  of  the  United  States  and  to  return  the 

same  by  first  class  mail  no  later  than , 19 . 

With  my  signature  below  and  a copy  of  this  note,  1 acknowledge  the 
receipt  of  a loan  copy  of  the  tutorial  diskette  and  a copy  of  this  form. 

Sincerely, 


Please  check  below  for 
size  of  floppy  borrowed: 

5-1/4"  - 1.21  MB 
3-1/2"  - 1.44  MB 


(signature) 
(full  name) 
(affiliation) 
(str.  address) 
(city  & zip) 
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Appendix  A - Listing  of  NIST  Diskette  92330FONG-1 


104  File(s)  735Z32  bytes  free 
Directory  of  A:\ 

Volune  in  drive  A is  92330FONG-1 


APP 

MOO 

39552 

2-02-87 

12:44p 

ASTM  1CL 

DAT 

94 

4-02-92 

10:07a 

OOE_AUT2 

DAT 

320 

4-01-92 

3:25p 

ASTM  2CL 

DAT 

901 

4-10-92 

8:24a 

DOE~AUT3 

DAT 

620 

4-01-92 

2:16p 

ASTM^CL 

DAT 

130 

4-10-92 

8:24a 

doe'auto 

DAT 

138 

4-01-92 

3:42p 

astm'ank 

DAT 

901 

4-10-92 

8:24a 

ooe'ccc 

DAT 

383 

4-01-92 

1:34p 

astm'fcg 

DAT 

94 

4-02-92 

10:07a 

doe'hist 

DAT 

327 

3-10-92 

10:55a 

ASTM~FCG 

TAB 

1813 

4-02-92 

1:04p 

doe‘lag 

DAT 

138 

4-01-92 

3:32p 

ASTM  LAB 

DAT 

130 

4-10-92 

8:24a 

D0E_LAG2 

DAT 

320 

4-01-92 

3:25p 

astm'lab 

TAB 

2293 

4-11-92 

3:06p 

D0E~LAG3 

DAT 

620 

4-01-92 

2:16p 

astm'lbs 

DAT 

108 

4-11-92 

3:02p 

doe"mb20 

DAT 

620 

3-12-92 

10:33a 

astm”lb5 

TAB 

2227 

4-11-92 

3:03p 

DOE  MB50 

DAT 

1700 

3-12-92 

10:34a 

ASTM  LC6 

DAT 

82 

6-01-92 

11:56a 

doe’pare 

DAT 

160 

3-13-92 

4:41p 

ASTM  RND 

DAT 

178 

4-10-92 

12:54p 

DOE  PCC 

DAT 

620 

4-01-92 

2:16p 

ASTM  RND 

TAB 

1813 

4-10-92 

1:17p 

DOE  PI 44 

DAT 

1174 

5-19-92 

10:21p 

CLEANFL 

EXE 

35246 

12-20-91 

2:28p 

DOE  PIE 

DAT 

160 

3-13-92 

4:41p 

CLEANFL 

FOR 

301 

12-20-91 

2:27p 

doe'plot 

DAT 

383 

4-01-92 

1:34p 

COMMAND 

COM 

32496 

8-14-90 

5:00a 

DP  ~ 

BAT 

67 

2-24-92 

1:38p 

CONVFL 

EXE 

35070 

12-11-91 

9:56a 

DPDATA 

<D1R> 

5-14-92 

10:13a 

DISTBETA 

DP 

2114 

4-12-92 

10:54a 

DPLOGF 

TEX 

3708 

11-13-91 

12:26p 

DISTBINO 

DP 

2114 

4-12-92 

10:58a 

DPSYSF 

TEX 

295 

11-14-91 

6:27a 

DISTCAUC 

DP 

2114 

4-12-92 

10:59a 

EDCOMM 

TEX 

405 

2-24-92 

2:40p 

DISTCHSQ 

DP 

2114 

4-12-92 

11:01a 

F3-911P1 

6392 

3-11-92 

1:33p 

DISTEXPO 

DP 

2114 

4-12-92 

11:02a 

F3-911RC 

6139 

3-11-92 

1:21p 

DISTGAMA 

DP 

2114 

4-12-92 

11:03a 

F3-912P1 

4794 

3-30-92 

11:47a 

DISTGEOM 

DP 

2114 

4-12-92 

11:04a 

F31-91-1 

1598 

5-19-92 

9:45p 

DISTLMDA 

DP 

2114 

4-12-92 

11:05a 

F31-91-2 

1598 

3-30-92 

2:06p 

DISTLOGI 

DP 

2114 

4-12-92 

11:06a 

FIGURE 

SYS 

5089 

1-22-87 

12:52p 

DISTLOGN 

DP 

2114 

4-12-92 

11:07a 

LINKER 

SYS 

4752 

11-07-86 

6:07p 

OISTNORM 

DP 

5964 

6-02-92 

10:58a 

LOADER 

SYS 

3428 

11-12-86 

12:14p 

DISTNORM 

DPS 

5949 

6-01-92 

9:56a 

PDA 

BAT 

94 

11-11-91 

3:14p 

DISTPOIS 

DP 

2114 

4-12-92 

11:09a 

PDA 

LOG 

50944 

5-19-92 

10:03p 

DISTSTUD 

DP 

2114 

4-12-92 

11:10a 

P1QTR1  X 

62631 

3-11-92 

1:03p 

DISTUNIF 

DP 

2114 

4-12-92 

11:11a 

P1QTR2~X 

80274 

10-23-91 

9:41a 

DISTUEIB 

DP 

3934 

6-02-92 

10:50a 

POSTSCRl 

TEX 

110637 

2-19-92 

2:16p 

DISTUEIB 

G09 

3934 

6-02-92 

11:07a 

PROLOG 

EXE 

46300 

2-02-87 

12:21p 

DISTWEIB 

G13 

3934 

6-02-92 

10:50a 

PROLOG 

SYS 

7424 

11-07-86 

6:42p 

DISTXVT1 

DP 

2114 

4-12-92 

11:12a 

SAVEPLUS 

2560 

12-20-91 

4:39p 

DISTXVT2 

DP 

2114 

4-12-92 

11:13a 

SCRATCH 

1194 

2-19-92 

2:09p 

DOEAUTO 

DP 

1799 

5-21-92 

3:33p 

STATANOV 

DP 

990 

4-11-92 

3:11p 

DOECCC 

DP 

1865 

5-20-92 

11:58a 

STATANOV 

DP2 

827 

4-11-92 

2:57p 

DOEHISTO 

DP 

1996 

3-31-92 

10:45a 

STATBCOX 

DP 

1544 

5-27-92 

3:20p 

DOELAG 

DP 

1385 

4-01-92 

3:38p 

STATBOXP 

DP 

2114 

4-12-92 

11:14a 

D0EP4Q7F 

DP 

3327 

5-20-92 

9:12a 

STATCHIS 

DP 

2114 

4-12-92 

11:16a 

OOEPARET 

DP 

2756 

5-14-92 

3:18p 

STATSCAT 

DP 

2114 

4-12-92 

11:17a 

DOEPCC 

DP 

1649 

4-01-92 

2:22p 

STATSUM4 

DP 

1079 

4-10-92 

10:17a 

DOEPIECH 

OP 

2859 

3-31-92 

12:20p 

STATSUMT 

DP 

809 

4-10-92 

1:15p 

DOEPLOTF 

DP 

2616 

5-28-92 

3:27p 

STATTESF 

DP 

2114 

4-12-92 

11:18a 

DOEPRED1 

DP 

2740 

5-26-92 

10:52a 

STATTESL 

DP 

1995 

5-27-92 

3:17p 

DOEPRED2 

DP 

3094 

5-26-92 

1:56p 

STATTESL 

DP2 

2103 

4-11-92 

1:51p 

DOE  1COL 

DAT 

327 

3-10-92 

10:55a 

STATTEST 

DP 

2114 

4-12-92 

11:19a 

D0e“2CLA 

DAT 

383 

4-01-92 

1:34p 

STATTESW 

DP 

1605 

5-27-92 

3:18p 

DOE~2CLB 

DAT 

160 

3-13-92 

4:41p 

STATTESX 

DP 

1578 

5-27-92 

3:19p 

DOE  3C0L 

DAT 

1174 

5-19-92 

10:21p 
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Appendix  A - Listing  of  NIST  Diskette  92330FONG-1 
Continuation  Sheet 


30  File(s)  735232  bytes  free 
Directory  of  A:\DPDATA 


Votune 

in  drive  A is 

92330FONG- 

1 

<DIR> 

5-14-92 

10:13a 

<DIR> 

5-14-92 

10:13a 

ASTM_1CL 

DAT 

94 

4-02-92 

10:07a 

ASTM~2CL 

DAT 

901 

4-10-92 

8:24a 

ASTM~3CL 

DAT 

130 

4-10-92 

8:24a 

astm“ank 

DAT 

901 

4-10-92 

8:24a 

ASTM  FCG 

DAT 

94 

4-02-92 

10:07a 

ASTM~LAB 

DAT 

130 

4-10-92 

8:24a 

ASTM_LB5 

DAT 

108 

4-11-92 

3:02p 

ASTM~LC6 

DAT 

82 

6-01-92 

11:56a 

ASTM_RND 

DAT 

178 

4-10-92 

12:54p 

DOE  Tool 

DAT 

327 

3-10-92 

10:55a 

D0E~2CLA 

DAT 

383 

4-01-92 

1:34p 

D0E“2CLB 

DAT 

160 

3-18-92 

2:39p 

D0E~3C0L 

DAT 

1174 

5-19-92 

10:21p 

D0E“aUT2 

DAT 

320 

4-01-92 

3:25p 

D0E“aUT3 

DAT 

620 

4-01-92 

2:16p 

D0E~AUT0 

DAT 

138 

4-01-92 

3:42p 

doe'ccc 

DAT 

383 

4-01-92 

1:34p 

DOE~HIST 

DAT 

327 

3-10-92 

10:55a 

doe”lag 

DAT 

138 

4-01-92 

3:32p 

D0E~LAG2 

DAT 

320 

4-01-92 

3:25p 

D0E~LAG3 

DAT 

620 

4-01-92 

2:16p 

DOE~MB20 

DAT 

620 

3-12-92 

10:33a 

DO£”mB50 

DAT 

1700 

3-12-92 

10:34a 

DOE~PARE 

DAT 

160 

3-18-92 

2:39p 

doe“pcc 

DAT 

620 

4-01-92 

2:16p 

DOE~PI44 

DAT 

1174 

5-19-92 

10:21p 

D0E~PIE 

DAT 

160 

3-13-92 

4:41p 

doe'plot 

DAT 

383 

4-01-92 

1:34p 
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Appendix  B 


Listing  of  Prolog  Code 

PDA.LOG  (v.  92.2) 
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Appendix  B - Listing  of  Prolog  Code  PDA. LOG  (v.  92.2) 


((xmen2  20  _snilst  _remlst  _lst) 

(xmen  _lst)) 

((xmen2  _nn  _smlst  ()  _lst) 

(CONCAT  _smlst  ("next  fsage"  exit)  _ls)) 

((xmen1  _lst) 

(xtnen2  0 ()  _lst  _lst)) 

((isat  X lx  y _pTst  newlst) 

(OM  "-Sl"“_lx) 

(renrvatgo  _y  jjlst  _newlst)) 

((isat  _x  _lx  _y  jslst  _newlst) 

(remvatgo  _y  (_x|_plst)  _newlst)) 

((frmlgoon  _?nme  jslst  _lst  _x) 

(ON  _x  jsTst) 

(frmlgo  _fnme  joist  _lst)) 

((frmlgoon  _fnme  joist  _lst  _x) 

(frmlgo  fnine  ( xjjolst)  1st)) 

((a  ID) 

((b  12)) 

((wrf  ap  fk  fl  y) 

(CREATE  "fl)" 

(OPEN  _fr) 

(FORALL  ((  fk  cat)  (oldav  ap  cat  x y z la))  ((list3-1a  fl  _cat  x y z la)  (WRITE  fl  ()))) 
(CLOSE  fl)" 

(PP) 

(PP) 

(P  " File  " _fl  " written  to  disk")) 

((shdir4  _ap  _fk  _fl  _y  no) 

(onlyweTds  x) 

(opn  chart) 

(shdir  _fk  _y)) 

((shdir4  _ap  _fk  _fl  _y  yes) 

(wrf  _ap  _fk  _fr  _y)) 

((shdirf  ap  fk  fl  y 1st) 

(ON  fl"  1st) 

(PP)" 

(P  " File  " fl  " already  exists") 

(PP) 

(PP) 

(P  " Overwrite?") 

(SMENU  _count  (yes  no)  " continue"  15  30  1 1 10) 

(shdir4  _ap  _fk  _fl  _y  _count)) 

((shdir3  _ap  _fk  _fl  _y  _Tst) 

(wrf  _ap  _fk  _fr  _y)) 

((shdirl  _ap  _fk  exit  _y) 

(be  nice)) 

((shdir2  _ap  fk  fl  y) 

(DIR  "C:/DATAPLOT/*>"  _lst) 

(shdir3  _ap  _fk  _fl  _y  _lst)) 

((try  empt) 

(OPEN  junk) 

(FR  junk  ((S  0))  ( X)) 

(PP  X) 

(READ  junk  ()) 

(PP  w) 

(CLOSE  junk)) 
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((godeco  _fdir  ()  _a  _drep) 

(REVERSE  _a  _drepj) 

((godeco  _fdir  (_a|_b)  _c  _drep) 

(CONCAT  _fdir  _q  _a) 

(godeco  _fdir  _b  (_q|_c)  _drep)) 

((decorep  _fdir  _rep  _drep) 

(godeco  _fdir  _rep  ()  _drep)) 

((era  _no) 

(aplnm  _ap) 

(DELCL  7(mtype  _ap  _no))) 

(FORALL  ((oldav  _ap~_x  _y  _z  _Z2  _no))  ((DELCL  ((oldav  _ap  _x  j 
((savit  ndd) 

(SAVE  rKidZweld)} 

((findposi  -1  _x  _po  _t) 

(aplnm  _ap) 

(=  _qo  7_po  + D) 

(findpos  _x  _qo  _t)) 

((findposi  _u  _x  _po  _t) 

(aplnm  _ap) 

(ADDCL  7(mtype  _ap  _x))  _po)) 

((endpos  _x) 

(aplnm  _ap) 

(mtype  ap  _t) 

(CMP 

(ADDCL  ((mtype  _ap  _x))) 

(FORALL  ((testP  _z)  (_z  _u))  ((ADDCL  ((oldav  _ap  _u  0 0 0 _x))) 
((endpos  _x) 

(aplnm  _ap) 

(mtype  ap  t) 

(NOT  CMP  -r_t  jDo)) 

((reweld  x) 

(CUUIND  welds) 

(CLOSE  old-data) 

(CLOSE  new-data) 

(CLOSE  chart) 

(rewind  welds  welds)) 

((closewind  x) 

(CUUIND  &:) 

(CLOSE  _x)) 

((alter  -1  up)) 

((alter  0 unchanged)) 

((alter  1 down)) 

((compar  x y z) 

(=  w ("x  * 10000)) 

(=  “u  (“y  * 10000)) 

(=  XX  7lP  w)) 

(=  ~_yy  (IP  lu)) 

(CMP  _crit  _xx  _yy) 

(alter  crit  z)) 

((abc  _xx) 

(mtype  _xx) 

(PP  mtype  exists)) 

((abc  _xx) 

(PP  new  mtype)) 

((round  x y rd) 

(=  _z  7l0"‘  “x)) 

(=  w ( z * y ♦ 0.5)) 

(=  _yy  7lP  _w)) 

(=  _rd  (_yy  / _z))) 

((up2  _tp  _sl) 

(up3  _tp  _sl)) 

((up2  _tp  _sl) 

(onlywelds  x)) 


z zz  no)))))) 


))) 
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((men-doe-fac2  _tp  _cat) 

(ISALL  _ea  _y  (_tp  _y)) 

(SMENU  _cat  _ea  " Facility Year-Qtr  "5511  20)) 

((over2  _tp  _sr  "in  same  list") 

(onlywelds  x) 

(up4  _tp  _sl  "enter  data")) 

((over2~  tp  si  "in  another  list") 

(old))“ 

((over2  _tp  _sl  no) 

(onlywelds  x)) 

((overl  _tp  _sl) 

(onlywelds  x) 

(rewind  "Continue?") 

(PP) 

(P  " list  " si) 

(PP) 

(PP) 

(P  " ") 

(P  "Do  you  wish  to  alter  another  point?") 

(SMENU  _wh  ("in  same  list"  no  "in  another  list")  " go  on  " 12  28  1 1 16) 
(over2  _tp  _sl  _wh)) 

((go4a  _tp  _ft  new) 

(another  _tp  _ft)) 

((go4a  _tp  _ft  old) 

(overT  _tp  _ft)) 

((go4  _tp  -enter-  _tm  _ft  _xp  _yp  _zp  _nxp  _nyp  _nzp  _olne) 

(aplnm  _ap) 

(DELCL  ?(oldav  _ap  _ft  _ux  _uy  _uz  _tm))) 

(ADDCL  ((oldav  _ap  _ft  _nxp  _nyp  _nzp  _tm))) 

(re-sort  _ft) 

(onlywelds  x) 

(go4a  _tp  _ft  _olne)) 

((go4  _tp  repeat  _tm  _ft  _xp  _yp  _zp  _nxp  _nyp  _nzp  _olne) 

(onlywelds  x) 

(go3  _tp  _tm  _ft  _xp  _yp  _zp  _olne)) 

((go3c  _tp  _titfk  _tm  _ft  _xp  _yp  _zp  _nxp  _nyp  exit  _olne) 

(onlywelds  x)) 

((go3c  _tp  _titfk  _tm  _ft  _xp  _yp  _zp  _nxp  _nyp  _nzp  _olne) 

(rewind  new-data) 

(P  _titfk) 

(P  " new  observation  n-data") 

(PP) 

(PP) 

(list3-1a  new-data  _ft  _nxp  _nyp  _nzp  _tm) 

(SMENU  _chc  (-enter-  repeat)  entry  15  T5  1 1 9) 

(go4  _tp  _chc  _tm  _ft  _xp  _yp  _zp  _nxp  _nyp  _nzp  _olne)) 

((go3b  _tp  _titfk  _tm  _ft  _xp  _yp  _zp  _nxp  exit  _olne) 

(onlywelds  x)) 

((go3b  tp  titfk  tm  ft  xp  yp  zp  nxp  nyp  _olne) 

(PP)  ■■ 

(P  "Please  enter  new  observed  z-data  ") 

(R  _nzp) 

(go3c  _tp  _titfk  _tm  _ft  _xp  _yp  _zp  _nxp  _nyp  _nzp  _olne)) 

((go3a  _tp  _titfk  _tm  _ft  _xp  _yp  _zp  exit  _olne) 

(onlywelds  x)) 

((go3a  tp  titfk  tm  ft  xp  yp  zp  nxp  olne) 

(PP) 

(P  "Please  enter  new  observed  y-data  ") 

(R  _nyp) 

(go3b  tp  titfk  tm  ft  xp  yp  _zp  nxp  nyp  _olne)) 

((titl  f”1  "DOE  Facility  NoT  1"T) 

((titl  F-2  "DOE  Facility  No.  2")) 

((titl  F-3  "DOE  Facility  No.  3")) 
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( (up4c  file  _tp) 

(up4q  _tp)T 
((up4c  keyixi  _tp) 

(up4d  _tp)) 

((up4c  _ndat  _tp  _sl) 

(onlywelds  x) 

(rewind  n-data-) 

(P  •'  n-data  " si) 

(CUUIND  welds) 

(go2  _tp  _ndat  _sl  old)) 

((up4d  _tp) 

(opn  obs- label) 

(PP  Enter  nunber  for  n-data) 

(R  _ndat) 

(rewind  obs- label) 

(up4e  _tp  _ndat)) 

((go3  _tp  _tm  _ft  _xp  _yp  _zp  _olne) 

(rewind  old-data) 

(CLOSE  chart) 

(titl  _fk  _titfk) 

(P  _titfk) 

(P  " old  observation  n-data") 

(PP) 

(PP) 

(list3-1a  old-data  ft  xp  _yp  zp  tm) 

(PP) 

(PP) 

(P  "Please  enter  new  observed  x-data  ") 

(R  _nxp) 

(go3a  _tp  _titfk  _tm  _ft  _xp  _yp  _zp  _nxp  _olne)) 

((up4e  _tp  exit) 

(onlywelds  x)) 

((up4e  _tp  _ndat) 

(aplnm  _ap) 

(mtype  _ap  _ndat) 

(go2  _ndat  _tp)) 

((up4e  _tp  _ndat) 

(PP  n-data  _rKlat  does  not  exist)) 

((up4q1  ap  tp  run  exit) 

(PP) 

(P  " Thank  you")) 

((up4q1  ap  tp  run  fname) 

(PP) 

(P  " ") 

(PP  reading  fname) 

(OPEN  _fnameT 

(reading  _fname  _ap  _run  0) 

(rewind  "reading  from  disc") 

(PP) 

(P  " Data  from  " fname  ",  for  " run  " have  been  entered") 
(PP) 

(PP) 

(P  " in  the  database:  ") 

(P  _ap) 

(re-sort  run)) 
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((up4  _tp  _sl  "see  all") 

(aplntn  _ap) 

(onlywelds  x) 

(opn  observations) 

(liston  _tp  _sl  _ap  back)) 

((up4  _tp  _sl  "enter  data") 

(onlywelds  x) 

(rewind  "Change  old  data") 

(PP) 

(P  " ") 

(P  si) 

(PP) 

(PP) 

(P  " Select  point  to  alter") 

(PP) 

(P  " from  menu  at  left") 

(aplnm  _ap) 

(ISALL  _all  X (mtype  ap  _sl  x)) 

(SMENU  _ndat~_all  "data  pt"  55119) 

(up4c  _ndat  _tp  _sl)) 

((up3a  _tp) 

(SMENU  _nxt  ("enter  data"  "see  all")  -next-step  55119) 

(up4  _tp  _nxt)) 

((anotherl  _tp  _sl  "to  same  list") 

(onlywelds  x) 

(opn  new-data) 

(keyl  _tp  _sl)) 

((anotherl  _tp  _sl  "to  another  list") 

(up1-1  keyboard)) 

((anotherl  _tp  _sl  _y) 

(onlywelds  x)) 

((keyl  _tp  _sl) 

(rewind  "Current  List") 

(PP) 

(P  " ") 

(PP  _sl) 

(rewind  new-data) 

(PP) 

(P  " Please  enter  the  name  label  (e.g.,  1,  2,  3,  A1,  A2,  etc.)") 
(PP) 

(PP) 

(P  " of  the  new  data  point  (n-data)  below:") 

(PP) 

(PP) 

(P  " (Six  characters  maximum)") 

(PP) 

(PP) 

(P  " ") 

(R  _y) 

(upTa  _tp  _y  _sl)) 

((upla  _tp  exit  _sl) 

(onlywelds  x)) 

((upla  _tp  y si) 

(PP  _sl)  " 

(PP  Thank  you) 

(CLOSE  "First  nonber  of  data  points  (n-data)") 

(ckdup  _tp  _y  _sl)) 
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((firxdpos  _x  _sl  _po  _tt) 

(aplnm  _ap) 

(mtype  _ap  _sl  _t) 

(CMP 

(CMP  _crTt  _t  _x) 

(find^sl  _crit  _sl  _x  _po  _t)) 

((findpos  _x  _sl  jxi  _tt) 

(aplnm  _ap) 

(ADOCL  7(mtype  _ap  _sl  _x))  _po)) 

((findpos  _x  _sl  joo  _tt) 

(aplnm  _ap) 

(FORALL~((testP  _fl)  (_fl  _tp))  ((ADOCL  ((oldav  _ap  _tp  000  _x))  _po)))) 
((another  _tp  _sl) 

(onlywelds  xT 
(rewirtd  "Continue?") 

(PP) 

(P  " list  " _sl) 

(PP) 

(PP) 

(P  " ") 

(P  "Do  you  wish  to  add  another  point?") 

(SMENU  wh  ("to  same  list"  no  "to  another  list")  "go  on"  12  28  1 1 16) 
(another!  _tp  _sl  _wh)) 

((ckdup  _tp  _x  _sl) 

(aplnm  _ap) 

(mtype  ap  si  _t) 

(EQ  _t  7x)  ” 

(PP  n-data  x already  exists) 

(PP) 

(P  "Enter  any  letter  to  continue  ") 

(R  _oo) 

(another  _tp  _sl)) 

((ckdup  _tp  _x  _sl) 

(aplnm  ap) 

(FORALL“((testP  _fl)  (_fl  _r))  ((ckduq  _ap  _r  _x))) 

(findpos  _x  _sl  1 0) 

(ck2  _tp  IsD) 

((ckduq  _ap  _tp  _x) 

(oldav  _ap  _tp  _a  _b  _z  _x)) 

((ckduq  _ap  _tp  _x) 

(ADDCL  ((oldav  _ap  _tp  000  _x)))) 

((re-sort  _sl) 

(aplnm  _ap) 

(mtype  _ap  _sl  _rr) 

(ISALL  all  X Tmtype  ap  si  x)) 

(SORT  _all  _alls) 

(FORALL  ((mtype  ap  si  y))  ((DELCL  ((mtype  ap  si  y))))) 

(FORALL  ((ON  _z  ^alls))  7(ADDCL  ((mtype  _ap  _sl  _z)))T)) 

((re-sort  _sl)) 

((ck2  _tp  _ndat  _sl) 

(re-sort  _sl) 

(onlywelds  x) 

(go2  _tp  _ndat  _sl  new)) 

((up3  _tp  _sl) 

(SMENU  _nxt  ("enter  data"  "see  all")  next-step  55119) 

(up4  _tp  _sl  _nxt)) 

((up3  _tp  _sl  _nxt)) 
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((list4  _cr  _sl  listing)) 

((list4  _cr  _sl  back) 

(opn  cont) 

(P  " Type  any  letter  to  continue  ") 

(R  _xx) 

(onlywelds  x) 

(up3  _cr  _sl ) ) 

((list4  _cr  _sl  back)) 

((listSa  _cr  _ap  _tt  _ll) 

(oldav  _ap  _tt  _a  _b  _z  _c) 

(FORALL  ((mtype  _ap  _tt  _ru)  (oldav  _ap  _tt  _xp  _yp  _zp  _ru))  ((list3-1a  observations  _tt  _xp  _yp  _zp  _ru))) 
( I ist4  _cr  _tt  _Tl )) 

((list3a  cr  ap  tt  ll) 

(PP) 

(PP) 

(PP) 

(PP) 

(PP) 

(P  " No  data  exist  for  run  " _tt) 

( I ist4  _cr  _tt  _l I ) ) 

((up4q  _tp) 

(onlywelds  x) 

(aplnm  ap) 

(ISALL  “all  X ( tp  X)) 

(SMENU  “run  “alT"  Facility Year-Qtr  •'  5 30  1 1 20) 

(rewind  "reading  from  disc") 

(PP) 

(P  " Please  name  file  to  read") 

(PP) 

(P  " ") 

(R  _fnaine) 

(conv  _fname) 

(rewind  "reading  from  disc") 

(up4q1  _ap  _tp  _run  _fname)) 

((up1-1a  f i leT 
(men-doe-fac  _tp) 

(up4q  _tp)) 

((interpr  "3.  IDAHO"  ("F-U33  AMCF  (Adv  React  Meas  Fac  & Coupled  Fast  RMF)"  "F-2 
[3]  ATR  (Advanced  Test  Reactor)"  "F-3[33  CONT  (Contractor)"  "F-4(3]  HD50  (Alpha 
Fuels  Fac  - Mound  Plant/Bldg  50)"  "F-5[3]  TRHC  (Test  Reactor  Hot  Cell  Facility) 

" "F-6C3]  " "F-7[3]  "))) 

((interpr  "1.  CH-AN"  ("F-1[1]  CONT  (Contractor)"  "F-2[1]  EBR  (Experimental  Bree 
der  Reactor  -II)"  "F-3[1]  FMF  (Fuel  Manufacturing  Facility)"  "F-4[1]  HFEF  (Hot 
Fuel  Examination  Facility)"  "F-5[1]  HAND  (Janus)"  "F-6[1]  NRAD  (Neutron  Radiogra 
phy  Facility)"  "F-7[13  TREA  (Transient  Reactor  Test)"))) 

((interpr  "2.  CH-BN"  ("F-1[2]  BMRR  (Brookhaven  Medical  Research  Reactor"  "F-2C2] 

CONT  (Contractor)"  "F-3[2]  HFBR  (High  Flux  Beam  Reactor"  "F-4[2]  " "F-5[2]  " 

"F-6(2]  " "F-7[2]  "))) 

((interpr  "4.  OAKRI"  ("F-1[4]  CONT  (Contractor)"  "F-2C4]  HFIR  (High  Flux  Isotope 
Reactor)"  "F-3[4]  PADU  (Paducah  Gaseous  Diffusion  Plant)"  "F-4[4]  PORT  (Portsmo 
uth  Gaseous  Diffusion  Plant)"  "F-5[4]  REDC  (Radiochemical  Engineering  Dev.  Ctr.) 

" "F-6C4]  TSR  (Tower  Shielding  Reactor)"  "F-7[4]"))) 

((interpr  "5.  RL-WH"  ("F-U5]  B308  (Building  308)"  "F-2C5]  CONT  (Contractor)"  "F 
-3[5]  FFTF  (Fast  Flux  Test  Facility)"  "F-4[5]  FMEF  (Fuels  & Materials  Examinatio 
n Facility)"  "F-5[5]  MASF  (Maintenance  & Storage  Facility)"  "F-6I5]"  "F-7[5]"))) 

((interpr  "6.  SF-LL"  ("F-1[6]  AVLI  (AVLIS)"  "F-2C6]  CONT  (Contractor)"  "F-3[6]" 

"F-4C6]"  "F-5C6]"  "F-6[6]"  "F-7[6]"))) 

((interpr  "7.  SF-RI"  ("F-1[7]  CONT  (Contractor)"  "F-2[7]  ETEC  (Energy  Technology 
Engineering  Center)"  "F-3[7]"  "F-4[7]"  "F-5m"  "F-6[7]"  "F-7[7]"))) 

((interpr  "8.  TOTAL"  ("F-1[8]"  "F-2[8]"  "F-3[8]"  "F-4C8]"  "F-5[8]"  "F-6[8]"  "F-7 
[8] "))) 

((interpr  "0.  DEMO"  ("F-1[x]"  "F-2[x]"  "F-3[x]"  "F-4[x]"  "F-5[x]"  "F-6tx]"  "F-7 

[X]  "))) 
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((windcont  _tp) 

(aplnm  _ap) 

(shortaplntn  _ap  _aps) 

(onlywelds  x) 

(opn  " Meaning  of  Facility  Designation") 

(FORALL  ((interpr  _aps  _expl)  (ON  _ex  _expl))  ((P  _ex)  (PP))) 
(ISALL  all  X (testP  x)) 

(SMENU  ”tp  _all  " Facility  "551  19)) 

( ( i nsup  tp  si) 

(PP) 

(PP) 

(P  " Please  select  from  menus") 

(PP) 

(men-doe-fac  _tp) 

(ISALL  _ev  _y  (_tp  _y)) 

(SMENU  _sl  _ev  " Facility Year-Qtr  " 5 30  1 1 20)) 

((goout  save) 

(SAVE  "a:\PDA.LOG") 

(EXIT  0)) 

((goout  nosave) 

(EXIT  0)) 

((clean  exit) 

(SMENU  _x  (save  nosave)  quit  5 20  1 1 9) 

(goout  _x)) 

((clean  save) 

(SAVE  "a:\PDA.LOG")) 

((clean  clear) 

(closeall  X) 

(barit  x)) 

((clean  restart) 

(closeall  X) 


(apl 

ic  X)) 

((F- 

3 

F3 

DEMO-1 )) 

((F- 

3 

F3 

DEMO-2) > 

((F- 

3 

F3 

DEMO-3)) 

((F- 

3 

F3 

OEMO-4)) 

((F- 

3 

F3 

1991-1)) 

((F- 

■3 

F3 

1991-2)) 

((F- 

■3 

F3 

1991-3)) 

((F- 

3 

F3 

1991-4)) 

((F- 

•2 

F2 

DEMO-1 )) 

((F- 

•2 

F2 

DEMO-2)) 

((F- 

•2 

F2 

OEMO-3)) 

((F- 

•2 

F2 

DEMO-4)) 

((F- 

•2 

F2 

1991-1)) 

((F- 

■2 

F2 

1991-2)) 

((F- 

■2 

F2 

1991-3)) 

((F- 

■2 

F2 

1991-4)) 

((F- 

■1 

FI 

DEMO-1 )) 

((F' 

•1 

FI 

DEMO-2)) 

((F- 

-1 

FI 

DEMO-3)) 

((F' 

•1 

FI 

DEMO-4)) 

((F' 

•1 

FI 

1991-1)) 

((F- 

■1 

FI 

1991-2)) 

((F 

•1 

FI 

1991-3)) 

((F 

-1 

FI 

1991-4)) 

((F 

-7 

F7 

DEMO-1 )) 

((F 

-7 

F7 

DEMO-2)) 

((F 

•7 

F7 

DEMO-3)) 

((F 

-7 

F7 

DEMO-4)) 

((F 

-7 

F7 

1991-1)) 

((F 

-7 

F7 

1991-2)) 

((F 

-7 

F7 

1991-3)) 

((F 

-7 

F7 

1991-4)) 
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((F-6  F6 DEMO-D) 

((F-6  F6 DEMO-2)) 

((F-6  F6 DEMO-3)) 

((F-6  F6 DEMO-4)) 

((F-6  F6 1991-1)) 

((F-6  F6 1991-2)) 

((F-6  F6 1991-3)) 

((F-6  F6 1991-4)) 

((F-5  F5 DEMO-D) 

((F-5  F5 DEMO-2)) 

((F-5  F5 DEMO-3)) 

((F-5  F5__ DEMO-4)) 

((F-5  F5 1991-1)) 

((F-5  F5 1991-2)) 

((F-5  F5 1991-3)) 

((F-5  F5 1991-4)) 

((F-4  F4 DEMO-D) 

((F-4  F4 DEMO-2)) 

((F-4  F4 DEMO-3)) 

((F-4  F4 DEMO-4)) 

((F-4  F4 1991-D) 

((F-4  F4 1991-2)) 

((F-4  F4 1991-3)) 

((F-4  F4 1991-4)) 

((listless  _x  _lst  J3lst) 

(listlessi  _x  _lst  ()  j5lst)) 

((listlessl  _x  (T  _qlst  _plst) 

(REVERSE  _qlst  _plst)) 

((listlessl  _x  (_x|_y)  _qlst  _plst) 
(listlessl  _x  _y  _qlst  jslst)) 

((listlessl  _x  (_a|_y)  _qlst  _plst) 
(listlessl  _x  _y  (_a|_qlst)  _plst)) 

((elim  ()  smlst  _smlst)) 

((elim  ( aj  b)  smlst  jjlst) 

(ON  _a"jDlst)" 

(elim  _b  _smlst  _plst)) 

((elim  (_a|_b)  _smlst  _plst) 

(elim  _b  _smlst  (_a|_plst))) 

((raising  ()  aurev  _aurev)) 

((raising  ( uj  v)  arev  aurev) 

(CHAROF  u nu)  ~ 

(CMP  -1  "nu~123) 

(CMP  1 _nu  96) 

(=  nnu  ( nu  - 32)) 

(CHAROF  _nnu) 

(raising  _v  (_w|_arev)  _aurev)) 

((raising  (_u|_v)  _arev  _aurev) 

(raising  _v  (_u|_arev)  _aurev)) 

((scrlst  _lst  _smist) 

(elim  _Tst  _smlst  ())) 

((asmlst  ()  ally  _ally)) 

((asmlst  (_aj_b)  _plst  _ally) 

(aplnri  _ap) 

(ISALL  _pl  y (oldav  _ap  a x y z la)) 
(CONCAT  jaTjalst  _newlst) 

(asmlst  _b  _newlst  _ally)) 

((raisecase  _arev  _aurev) 

(raising  _arev  ()  _aurev)) 

((sortout  _fk  _y  _lst) 

(scrlst  _lst  _smlst) 

(SORT  _smlst  _srtlst) 

(SMENU  _y  _srtlst  “y  values"  55119)) 
((mklst  _every  _ally) 

(asmlst  _every  ()  _ally)) 
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((rentvatgo  ()  newlst  _newlst)) 

((retnvatgo  (_xj  y)  _plst  _newlst) 

(STRINGOF  _lx~_x) 

(isat  _x  _lx  _y  jalst  _newlst)) 

((nameflZ  _ap  _ft  EXIT  _frvne) 

(be  ni ce) ) 

((nameflZ  _ap  _ft  exit  _frTne) 

(be  niceT) 

((nameflZ  ap  ft  fnm  fnme) 

(CONCAT  “frmi"'.DAT"  ?rm2) 

(CONCAT  "C:\DATAPLOT\"  _frm2  _fnme)) 

((caseconv  a _b) 

(STRINGOF~_alst  _a) 

(REVERSE  _alst  _arev) 

(raisecase  arev  aurev) 

(STRINGOF  _aurev  "b)) 

((prtnes  _ft  1) 

(P  " Please  enter  name  of  file  to  receive  Y & 
(PP) 

(P  " a Z-colum  format  for  ") 

(P  category  _ft)) 

((prmes  _ft  2) 

(P  " Please  enter  name  of  file  to  receive  ") 
(PP) 

(P  " y data  for  " _ft)) 

((asmbl  _fk  _y  _every) 

(aplnm  _ap) 

(mklst  _every  _ally) 

(sortout  _fk  _y  _ally)) 

((remvat  _lst) 

(rmvatgo  ()  joist  _lst)) 

((remvat  _oldlst  _newlst) 

(remvatgo  _oldlst  ()  _newlst)) 

((frmlgo  fnme  joist  1st) 

(EOF  fnme) 

(CLOSE  _fnme) 

(EQ  joist  _lst)) 

((frmlgo  fnme  joist  1st) 

(FR  Jniiie  ((C  19))  ( x)) 

(FR  _fnme  ((C  28))  (~w)) 

(frmTgoon  _fnme  joist  _lst  _x)) 

({conv  fname) 

(REN  “fname  OOOPPPPP) 

(EXEC  "convf I .exe"  ()  ret) 

(REN  OOOQQQ  _fname) 

(DEL  OOOPPPPP)) 

((xmen  _lst  x joist) 

(CONCAT  1st  (exit)  elst) 

(MMENU  (Ix|_y)  ()  _erst  x-values  5 5 10  1 25) 
(listless  _x  _lst  joist)) 

((shdir  _fk  _y) 

(onlywelds  x) 

(opn  chart) 

(aplnm  _ap) 

(namefl  _ap  _fk  _fl  2) 

(shdirZ  _ap  _fk  _fl  _y)) 

((gofor  datafl  _fk  _y) 

(onlywelds  x) 

(men-doe-fac  _fk) 

(ISALL  _every  _w  (_fk  _w)) 

(asmbl  _fk  _y  _every)) 


Z data  in") 
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((wind  welds)) 

((wind  n-data-)) 

((wind  old-data)) 

((wind  new-data)) 

((wind  chart)) 

((wind  retrn)) 

((wind  anita-out)) 

((wind  "To  print  outpxjt")) 

((wind  esc)) 

((wind  "Name  Your  Application")) 

((wind  " DOE  NE  Performance  Indicator  Data  Analysis  System  ")) 

((wind  "First  number  of  data  points  (n-data)")) 

((wind  observations)) 

((wind  obs-label)) 

((wind  cont)) 

((wind  "writing  to  disc")) 

((wind  "reading  from  disc")) 

((wind  "new  image  file")) 

((wind  "current  data")) 

((wind  "re-format  image  file")) 

((wind  "input  examples")) 

((wind  "process  file")) 

((wind  "Deleting  data  points")) 

((wind  "Select  Deletions")) 

((wind  "Change  old  data")) 

((wind  "Continue?")) 

((wind  "Current  List")) 

((wind  instructions)) 

((wind  " Meaning  of  Facility  Designation")) 

((wind  "Delete  old  Application")) 

((wirxd  "Explanation  of  dp  file  names")) 

((list3-1a  _wn  _tt  _xp  yp  -1  ru) 

(FU  wn  ((U  15)  "“  "~(U  19)“"  " (U  5)  " " (U  6))  (_tt  _xp  _yp  _ru)) 

(PP)) 

((list3-1a  wn  _tt  _xp  yp  _zp  _ru) 

(FW  wn  ((U  15)  " "“(U  19)  " " (U  5)  " " (F  18  10)  (U  6))  (_tt  _xp  _yp  _zp  _ru)) 

(PP)) 

((formxlist) 

(onlywelds  x) 

(opn  chart) 

(PP) 

(P  " Please  enter  name  of  file  to  read  ") 

(PP) 

(PP) 

(P  " ") 

(R  _fnme) 

(frmxlist  _fnme  _lst) 

(takex  _fnme  _lst)) 

((gof 12) 

(onlywelds  x) 

(opn  chart) 

(gof or  datafl  _fk  _y) 

(shdir  fk  y)) 

((spl) 

(onlywelds  x) 

(aplnm  _ap) 

(men-doe-fac  _fk) 

(ISALL  _every  _y  (_fk  _y)) 

(SMENU  _ft  _every  " Facility Year-Qtr  " 5 30  1 1 20) 

(opn  chart) 

(sp1-1  _ap  _ft)) 

((dos  X)  ~ 

(EXEC  "c:\command.com*'  ()  _ret) 

(onlywelds  x)) 
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((justanita  _x) 

(CUUIND  welds) 

(FORALL  ((wind  _wnd)  (NOT  EQ  _wnd  welds)  (NOT  EO  _wnd  anita-out)  (NOT  EQ  _wnd  "To  print  output"))  ((CLOSE 
((savel) 

(onlywelds  x) 

(aplnm  _ap) 

(ISALL  "all  _x  (testP  _x)) 

(SMENU  ”fk  _all  " DOE  Facility  " 5 5 1 1 16) 

(ISALL  _every  _y  (_fk  _y)) 

(SMENU  _ft  _every  " Facility Year*Qtr  " 5 30  1 1 20) 

(opn  chart) 

(P  " Please  enter  name  of  file  to  receive  all  information") 

(PP) 

(P  " including  data  in  ") 

(PP  category  ft) 

(PP) 

(PP) 

(P  " (Filename  not  to  exceed  8 characters  and") 

(PP) 

(P  " must  begin  with  an  alphabet.)") 

(PP) 

(PP) 

(R  fnme) 

(CREATE  _frme) 

(OPEN  _fnme) 

(FORALL  ((mtype  _ap  _ft  _tm)  (oldav  _ap  _ft  _xp  _yp  _zp  _tm))  ((list3-1a  _fnme  _ft  _xp  _yp  _zp  _tm)  (WRITE 
(CLOSE  fnme) 

(PP) 

(PP  Data  recorded  on  _fnii)e)) 

((disco  sav_dosfl) 

(savel)) 

((disco  op_sys) 

(justanita  x) 

(rewirtd  retrn) 

(PP) 

(P  " Type  exit  <enter>  to  return  to  program") 

(PP) 

(PP) 

(P  " Then  press  <escape>") 

(dos  X)) 

((disco  sav  dpdat) 

(spD) 

((disco  r_dpdat_y) 

(gof 12)T 

((disco  splitfl_x) 

(formxlist)) 

((disco  " - 1 •") 

(disco  op_sys)) 

((disco  " - 2 -") 

(disco  op_sys)) 

((disco  " - 3 -") 

(disco  op_sys)) 

((disco  " - 4 -") 

(disco  op_sys)) 

((liston  _tp  _sl  _ap  _ll) 

(opn  obs- label ) 

(FW  obs-label  ((U  15)  " " (U  19)  " " (U  9)  (U  18)  " " (U  6))  ("Facil_Year 

/Qtr"  DOE_NE_PI_Data ID  PI_Number  "PI_Value  " n-data)) 

(CUUIND  observations) 

(list3a  _tp  _ap  _sl  _ll)) 


wnd)))) 


fnme  ()))) 
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((list3  _cr  _ap  _ll) 

(ISALL  _aU  _x  (_cr  _x)) 

(SHENU  ~tt  _all  ” Facility Year-Qtr  " 3 10  1 1 20) 

(listen  _cr  _tt  _ap  _ll)) 

((list2  _cr  _ap  _chc) 

(onlywelds  x) 

(opn  observations) 

(list3  _cr  _ap  _chc)) 

((listit  _cr  _chc) 

(aplnm  _ap) 

(list2  _cr  _ap  _chc)) 

((lists  _x) 

(onlywelds  x) 

(propwind  chart  _aa  _ab  _ba  _bb) 

(CRWIND  chart  _aa  _ab  _ba  _bb) 

(listit  _x  _listing)) 

((readbkl  ap  _rn  _fl  _p) 

(NOT  EOF”  fl) 

(READ  fl”  a) 

(READ  ”fl  “b) 

(ADDCL”((ordav  ap  _rn  _a  _b  _z  _p))) 

(=  _q  (j3  + 1))” 

(ADDCL  ((mtype  _ap  _rn  jj))) 

(readbkl  _ap  _rn  _fl  _q)) 

((readbkl  ap  rn  _fl  j3) 

(EOF  fl) 

(CLOSE  _fl)) 

((readback  _ap  _rn  _fl) 

(readbkl  _ap  _rn  _fl  1)) 

((runitia  to  run) 

(OPEN  output) 

(FORALL  ((mtype  _to  _run  _ndat)  (oldav  _to  _run  _xu  _yu  _zu  _ndat))  ((DELCL  (( 
mtype  _to  _run  _ndat)))  (DELCL  ((oldav  _to  _run  _xu  _yu  _zu  _ndat))))) 

(readback  _to  run  output) 

(PP) 

(P  " " _to  " results  entered  on  " _rLrt)) 

((forprog  Relaxation  Creep  r-creep)) 

((forprog  Creep  Relaxation  c- relax)) 

((runiti  _from  _to) 

(onlywelds  x) 

(ISALL  _all  _x  (testP  _x)) 

(SMENU  _tp  _all  "relax  and  creep"  4 10  1 1 15) 

(ISALL  _every  _y  (_tp  _y)) 

(SMENU  _run  _every  relax-creep  3 10  1 1 15) 

(CREATE  input) 

(CREATE  input-n) 

(OPEN  input) 

(CREATE  output) 

(OPEN  output) 

(FORALL  ((mtype  _from  _run  _xx)  (oldav  _from  _run  _xa  _ya  _za  _xx))  ((FW  input  ((F  6 0)  (F  20  10))  (_ya 
(WRITE  input  ()))) 

(CLOSE  input) 

(rewirxi  "writing  to  disc") 

(forprog  _from  _to  _prog) 

(EXEC  "Ncomtnand.com"  ("/c"  _prog)  _ret) 

(CLOSE  output) 

(runitia  to  run)) 


1 


za)) 
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((runit  graph) 

(onlywelds  x) 

(aplnm  _ap) 

(ISALL  _aU  _x  (testP  _x)) 

(SMENU  ”fk  _all  testPs-  4 23  1 1 9) 

(ISALL  _every  _y  (_fk  _y)) 

(SMENU  ft  _every  testP-typ  3 23  1 1 9) 

(CREATE'input) 

(OPEN  input) 

(CREATE  output) 

(OPEN  output) 

(FORALL  ((mtype  _ap  _ft  _tm)  (oLdav  _ap  _ft  _xp  _yp  _zp  _tm))  ((FW  input  ((F  6 0)  (F  20  10))  (_yp  _2p)) 
(WRITE  input  ()))) 

(CLOSE  input) 

(rewind  "writing  to  disc") 

(PP) 

(PP) 

(P  " The  data  have  been  recorded  in  a file  named  INPUT") 

(EXEC  "Xconmand.com"  ("/c"  vgraph-1)  _ret) 

(CLOSE  output)) 

((dp5d2) 

(EXEC  "Xcommand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c:\coninand.com"  ("/c"  "dp  a:statanov.dp  0")  _r)) 

((dp5e2) 

(EXEC  "Xconrnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c:\cocnmand.com"  ("/c"  "dp  a:stattesf .dp  0")  _r)) 

((dp5e1) 

(EXEC  "Xcomnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xconrnand.com"  ("/c"  "dp  statchis.dp  0")  _r)) 

((dpSdl) 

(EXEC  "Xconrnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xcomnand.com"  ("/c"  "dp  a:stattest .dp  0")  _r)) 

((dp5c4) 

(EXEC  "Xconrnand.com"  ("/c"  "c:")  _ret) 

(EXEC  »c: Xcommartd.com"  ("/c"  "dp  a:statbcox.dp  0")  _r)) 

((dp5c3) 

(EXEC  "Xconrnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c; Xcomnand.com"  ("/c"  "dp  arstattesx.dp  0")  _r)) 

((dp5c2) 

(EXEC  "Xcomnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xcomnand.com"  ("/c"  "dp  aistattesw.dp  0")  _r)) 

((dp5c1) 

(EXEC  "Xcomnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xcomnand.com"  ("/c"  "dp  a:stattesl .dp  0")  _r)) 

((dp5b2) 

(EXEC  "Xcomnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xcomnand.com"  ("/c"  "dp  a:statsumt.dp  0")  _r)) 

((dpSbl) 

(EXEC  "Xcomnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xcomnand.com"  ("/c"  "dp  a:statsuin4.dp  0")  _r)) 

((dp5a2) 

(EXEC  "Xcomnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xcomnand.com"  ("/c"  "dp  a:statscat.dp  0")  _r)) 

((dp5a1) 

(EXEC  "Xcomnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xcomnand.com"  ("/c"  "dp  a:statboxp.dp  0")  _r)) 

((dp7j) 

(EXEC  "Xcomnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xcommand.com"  ("/c"  "dp  a:distpois.dp  0")  _r)) 

((dp7i) 

(EXEC  "Xcomnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xcomnand.com"  ("/c"  "dp  a:distgeom.dp  0")  _r)) 

((dpTh) 

(EXEC  "Xcomnand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c; Xcommand.com"  ("/c"  "dp  a:distbino.dp  0")  _r)) 
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((dp7g) 

(EXEC  "Xconmand.cont"  ("/c"  "c:") 
(EXEC  "c:\coninand. com"  ("/c"  "dp 
((dp7f ) 

(EXEC  "\co(Tmand.com"  ("/c"  "c:") 
(EXEC  "c:\co(iinand.com"  ("/c"  "dp 
((dp7e) 

(EXEC  "Xcommand.com"  ("/c"  "c:") 
(EXEC  "c:\comtnand.com"  ("/c"  "dp 
((dp7d) 

(EXEC  "\co(Tinand.com"  ("/c"  "c:") 
(EXEC  "c:\coiiinand.com"  ("/c"  "dp 
((dp7c) 

(EXEC  "\conmand.com"  ("/c"  "c:") 
(EXEC  "c:\command.com"  ("/c"  "dp 
((dpTb) 

(EXEC  "\conmand.com"  ("/c"  "c:") 
(EXEC  "c:\co(ir»and.com"  ("/c"  "dp 
((dp7a) 

(EXEC  "Ncomtnand.com"  ("/c"  "c:") 
(EXEC  "c:\comtnand.com"  ("/c"  "dp 
((dp6g) 

(EXEC  "Xcomnand.com"  ("/c"  "c:") 
(EXEC  "c:\comnand.com"  ("/c"  "dp 
((dp6f) 

(EXEC  "Xcomtnand.com"  ("/c"  "c:") 
(EXEC  "c:\coninand.com"  ("/c"  "dp 
((dp6e) 

(EXEC  "\co(ifnand.com"  ("/c"  "c:") 
(EXEC  "c:\confnand, com"  ("/c"  "dp 
((dp6d) 

(EXEC  "Xcommand.com"  ("/c"  "c:") 
(EXEC  "c:\command.com"  ("/c"  "dp 
((dp6c) 

(EXEC  "\comtnand.com"  <"/c"  "c:") 
(EXEC  "c;\comtnand.com"  ("/c"  "dp 
((dp6b) 

(EXEC  "\command.com"  ("/c"  "c:") 
(EXEC  "c:\conmand.com"  ("/c"  "dp 
((dp6a) 

(EXEC  "\commaryd.com"  ("/c"  "c:") 
(EXEC  "c:\command.com"  ("/c"  "dp 
((dptesti  " ") 

(dpi)) 

((dptesti  "5a.  Graphical  

(dpi)) 

((dptesti  "5b.  Exploratory  

(dpi)) 

((dptesti  "5c.  Test  for  Distrib.  -- 
(dpi)) 

((dptesti  "5d.  Test  for  Location  -- 
(dpi)) 

((dptesti  "5e.  Test  for  Variation  - 
(dpi)) 

((dptesti  box_plot) 

(dp5a1)) 

((dptesti  scatter_plot) 

(dp5a2)) 

((dptesti  surmary  four_plot) 
(dp5b1)) 

((dptesti  SLinnary_tabulation) 
(dp5b2)) 


_ret) 

a:distxvt2.dp 

_ret) 

ardistweib.dp 

_ret) 

ardistbeta.dp 

_ret) 

atdistgama.dp 

_ret) 

a:di stchsq.dp 
_ret) 

ardiststud.dp 

_ret) 

a:distlmda.dp 

_ret) 

a:distxvt1 .dp 
_ret) 

aidistexpo.dp 

_ret) 

a:distlogn.dp 

_ret) 

a:di stcauc.dp 
_ret) 

a:distlogi .dp 
_ret) 

a:distunif .dp 
_ret) 

ardistnorm.dp 


-'•) 

-") 

-") 

-") 

•") 


0") 


0") 

0") 

0") 

0") 

0") 

0") 

0") 

0") 

0") 

0") 

0") 

0") 

0") 


.r)) 

.r)) 

r)) 

,r)) 

r)) 

r)) 

r)) 

r)) 

r)) 

,r)) 

r)) 

r)) 

r}) 

r)) 
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((dptesti  Lantda-test) 

(dpScD) 

((dptesti  Ueibul l-test) 

(dp5c2)) 

((dptesti  Extrm_value-test) 

(dp5c3)) 

((dptesti  Box-Cox_transf rmtn) 

(dp5c4)) 

((dptesti  t-test) 

(dpSdl)) 

((dptesti  Cht_squared-test) 

(dpSel )) 

((dptesti  F-test) 

(dp5e2)) 

((dptesti  ANOVA) 

(dp5d2)) 

((dpdistrl  Normal) 

(dp6a)) 

((dpdistrl  Uniform) 

(dp6b)) 

((dpdistrl  Logistic) 

(dp6c)) 

((dpdistrl  Cauchy) 

(dp6d)) 

((dpdistrl  Lognormal) 

(dp6e)) 

((dpdistrl  Exponential) 

(dp6f)) 

((dpdistrl  Extreme_value_Type1 ) 

(dp6g)) 

((dpdistrl  " 7.  Families  of  Distr. — ") 

(dpi)) 

((dpdistrl  Tukey_lambda) 

(dp7a)) 

((dpdistrl  Sttjdents_t) 

(dpTb)) 

((dpdistrl  Chi_squared) 

(dp7c)) 

((dpdistrl  Gamma) 

(dp7d)) 

((dpdistrl  Beta) 

(dp7e)) 

((dpdistrl  Weibull) 

(dp7f)) 

((dpdistrl  Extreme_value_Type2) 

(dp7g)) 

((dpdistrl  Binomial) 

(dpTh)) 

((dpdistrl  Geometric) 

(dp7i)) 

((dpdistrl  Poisson) 

(dp7j)) 

((deliti  _ap) 

(mtype  _ap  _u  _x) 

(DELCL  T(mtype  _ap  _u  _x))) 

(deliti  _ap)) 

((deliti  _ap)) 

((dp4c2) 

(EXEC  "\command.com"  ("/c"  "c:")  _ret) 

(EXEC  "c:\command.com"  ("/c"  "dp  a:doepred2.dp 
((dp4c1) 

(EXEC  "\command.com*'  ("/c"  "c:")  _ret) 

(EXEC  "c:\coninand.com"  ("/c"  "dp  a:doepred1 .dp 


0") 

_r)) 

0") 

r)) 
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((dp4b) 

(EXEC  "Xconmand.com"  ("/C  "c:")  _ret) 

(EXEC  "c:\co(nmatxl.com"  ("/c"  "dp  a:doeauto.dp  0")  _r)) 

((dp4a) 

(EXEC  "\co(i¥tiand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c;\co(iiitand.co(n"  ("/c"  "dp  atdoelag.dp  0")  _r)) 

((dp3b) 

(EXEC  "Xconmand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c:\coninarxJ.cc5(n"  ("/c"  "dp  a:doepcc.dp  0")  _r)) 

((dp3a) 

(EXEC  "Xconrnarxi.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xconmand.com"  ("/c"  "dp  ardoeccc.dp  0")  _r)) 

((dp2e) 

(EXEC  "Xcommand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xconmand.com"  ("/c"  "dp  ardoeplotf .dp  0")  _r)) 

((dp2d) 

(EXEC  "Xconmand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xconmand.com"  ("/c"  "dp  a:doep4q7f .dp  0")  _r)) 

{(dp2c) 

(EXEC  "Xconmand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xconmand.com"  ("/c"  "dp  a:doeparet .dp  0")  _r)) 

((dp2b) 

(EXEC  "Xconmand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xconmartd.com"  ("/c"  "dp  ardoepiech.dp  0")  _r)) 

((dp2a) 

(EXEC  "Xconmand.com"  ("/c"  "c:">  _ret) 

(EXEC  "c: Xconmand.com"  ("/c"  "dp  atdoehi sto.dp  0")  _r)) 

((dptest  it) 

(SMENU  _chc  ("  " "5a.  Graphical  " box_plot  scatterjolot  "5b.  Expl 


oratory " siJimary_four_plot  siJrmary_tabulation  "5c.  Test  for  Distrib.  - 

Lambda-test  UeibuU-test  Extrm_value-test  Box-Cox_transf rmtn  "5d.  Test  for  L 
ocation  — " t-test  ANOVA  "5e.  Test  for  Variation  Chi_squared-test  F-test)  " 


Data  Analysis  & Tests  " 3 48  1 1 25) 

(dptesti  _chc)) 

((dpdistr  it) 

(SMENU  _chc  (Normal  Uniform  Logistic  Cauchy  Lognormal  Exponential  Extreme_valu 
e Typel  "~7.  Fami lies_of_Distr. — " Tukey_lambda  Students_t  Chi_squared  Gamma  Be 
ta  Ueibull  Extreme  value~Type2  Binomial  Geometric  Poisson")  " 6.  Probabi I i ty_Plot 
s " 3 48  1 1 25) 

(dpdistrl  _chc)) 

((dpD 

(EXEC  "Xconmand.com"  ("/c"  "c:")  _ret) 

(EXEC  "c: Xconmand.com"  ("/c"  dp)  _r)) 

((deconm  (.|  b)  c nm) 

(REVERSE  _c  _rm))” 

((deconm  ()  _c  nm) 

(REVERSE  _c  _nm)) 

((deconm  (_a|_b)  _c  _rm) 

(deconm  _b  (_a|_c)  _nm)) 

((del5  _cat  _cc) 

(aplnm  _ap) 

(FORALL  ((ON  _u  _cc)  (oldav  _ap  _cat  _x  _y  _z  _u))  ((DELCL  ((oldav  _ap  _cat  _x  _y  _z  _u))))) 
(FORALL  ((ON  _iju  _cc)  (mtype  _ap  _cat  _uu))  ((DELCL  ((mtype  _ap  _cat  _uu))))T 
(onlywelds  x) 

(rewind  "Deleting  data  points") 

(PP) 

(PP) 

(PP) 

(P  " Deletions  complete.")) 
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{(del4  _cat) 

(rewind  "Select  Deletions") 

(PP) 

(P  " Category  " cat) 

(PP) 

(PP) 

(P ) 

(PP) 

(PP) 

(P  " To  the  left  is  a multiple  choice  menu") 

(PP) 

(PP) 

(P  " Space  bar  or  backspace  key  will  move  arrow") 
(PP) 

(PP) 

(P  " When  arrow  is  on  a selection.  Use") 

(PP) 

(P  " plus  sign  to  highlight  it") 

(PP) 

(P  " minus  sign  to  remove  highlight") 

(PP) 

(PP) 

(P  " <ctrl>J  will  highlight  all  items") 

(PP) 

(P  " <ctrl>L  will  remove  all  highlights") 

(PP) 

(PP) 

(P  " When  highlighting  is  complete,  press  <ENTER> 
(PP) 

(P  " to  delete  highlighted  data  ")) 

((del it  _ap) 

(oldav  _ap  _a  _b  _c  _z  _d) 

(DELCL  7(oldav  _ap  _a  _b  _c  _z  _d))) 

(del it  _ap)) 

((del it  _ap) 

(delitT  _ap)) 


((carryout  _chc  _fl) 

(onlywelds  x) 

(opn  "process  file") 

(PP) 

(P  " Program  not  yet  ready  for  image") 

(PP) 

(PP) 

(P  " " chc  " of  " fl)) 


((carryout  _chc  _fl) 
(onlywelds  x)) 

((analysis  " - 1 •" 

(dpi)) 

((analysis  " - 2 

(dpi)) 

((analysis  " - 3 

(dpi)) 

((analysis  " . u •" 

(dpi)) 

((analysis  " - 5 

(dpi)) 

((analysis  " - 6 

(dpi)) 

((analysis  Oistribut) 
(onlywelds  x) 
(dpdistr  it)) 

((analysis  Tests) 
(onlywelds  x) 

(dptest  it)) 


) 

) 

) 

) 

) 

) 


") 
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((analysis  DATAPLOT) 

(dpi)) 

((analysis  Histogram) 

(dp2a)) 

((analysis  Pie-Chart) 

(dp2b)) 

((analysis  Pareto-Ch) 

(dp2c)) 

((analysis  PID-4Q-7F) 

(dp2d)) 

((analysis  "2DPlotFit") 

(dp2e)) 

((analysis  C-Chart) 

(dp3a)) 

((analysis  P-Chart) 

(dp3b)) 

((analysis  Lag-Plot) 

(dp4a)) 

((analysis  AutocorrP) 

(dp4b)) 

((analysis  Predict-1) 

(dp4c1)) 

((analysis  Predict-2) 

(dp4c2)) 

((findname  I nam) 

(STRINGOF~_lst  _l) 

(deconm  _lst  ()  _nm) 

(STRINGOF  _rm  _nam)) 

((copypix  _chc  _ftr) 

(findname  ftr  y) 

(CONCAT  _y“".pix"  _Z) 

(CONCAT  "COPY  " ciic  _c1) 

(CONCAT  cl  " " ~c2) 

(CONCAT  ~c2  _Z  _c3) 

(EXEC  "c:\command.com"  ("/c"  _c3)  _ret)) 

((give  example) 

(CURSOR  "input  examples"  2 23) 

(P  "Examples;") 


(PP) 

(PP) 

(FW  "input  examples"  ((U  3)  (0  6)  (Q  20)  (Q  20))  (" 
(PP) 

(PP) 

(P  " ")) 

((del3  _cat) 

(onlywelds  x) 

(del4  _cat) 

(aplnm  _ap) 

(I SAIL  _all  _x  (mtype  _ap  _cat  _x)) 

(MMENU  _sel  7)  _all  deletions  2 2 15  3 6) 

(del5  _cat  _sel)) 

((men-doe-fac  _tp) 


(windcont  _tp)) 

((del  la- 1 yes) 

(aplnm  _ap) 

(del it  _ap) 

(rewind  "Deleting  data  points") 

(aplnm  ap) 

(PP) 

(P  " All  data  in  application  " _ap) 
(PP) 

(PP) 

(P  " have  been  deleted.")) 


II 


"A:" 


"\D0S\PR0L0G\" 


"B:\T00LS\")) 
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((del1a-1  no) 

(rewind  "Deleting  data  points") 

(PP) 

(PP) 

(P  " Deletions  Cancelled")) 

((askproc  _fl) 

(opn  "current  data") 

(PP) 

(P  " " _fl) 

(SMENU  _chc  (display  analysis  transport)  image  55119) 
(CLOSE  ~fl) 

(carryout  _chc  _fl>) 

((entfile  "enter  new  name") 

(opn  "new  image  file") 

(PP) 

(P  " Please  enter  name  of  file  ") 

(R  _fn) 

(CONCAT  fn  ".pix"  _fdir) 

(CREATE  ~fdir) 

(OPEN  _fdir) 

(rewind  "new  image  file") 

(PP) 

(P  " File  " fn  " has  been  re-formatted  to  the  current") 
(PP) 

(PP) 

(P  " directory  as  a file  (512  X 512)  named  " _fdir) 
(askproc  _fdir)) 

((entfile  "input  file") 

(rewind  "re-format  image  file") 

(CURSOR  "re-format  image  file"  2 16) 

(P  "In  double  quotes,  artd  in") 

(CURSOR  "re-format  image  file"  4 18) 

(P  "CAPITAL  LETTERS  ONLY") 

(PP) 

(PP) 

(P  " enter  name  of  directory  containing  the  input  file") 
(opn  "input  examples") 

(give  example) 

(R  _direc) 

(onlywelds  x) 

(CONCAT  _direc  *.*  _fdir) 

(DIR  _fdir  _rep) 

(SMENU  _chc'’_rep  _direc  5 5 1 1 16) 

(CONCAT”_direc  _ftr  _chc) 

(copypix  _chc  _ftr) 

(fin^ame  _ftr  _justfl) 

(CONCAT  _justf r".pix"  _fpix) 

(onlywelds  x) 

(rewind  "new  image  file") 

(PP) 

(P  " File  " chc  " has  been  re-formatted  and") 

(PP) 

(PP)  ^ . 

(P  " stored  in  the  current  directory  as  " _fp'x) 

(askproc  _fpix)) 
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((della  All) 

(aplntn  _ap) 

(rewind^'Oeleting  data  points") 

(PP) 

(P  " Are  you  sure  that  you  wish  to") 

(PP) 

(PP) 

(P  " delete  all  data  in  application") 

(PP) 

(PP) 

(P  " " _ap  ?) 

(SMENU  _chc  (no  yesT  "last  chance"  14  15  1 1 16) 

(della-T  _chc)) 

((della  "Selected  Data") 

(onlywelds  x) 

(men-doe-fac  _tp) 

(onlywelds  x) 

(ISALL  _ea  _y  (_tp  _y)) 

(SMENU  _cat  _ea  " Facility Year-Qtr  "5511  20) 

(del3  _cat)) 

((up1-1  keyboard) 

(onlywelds  x) 

(opn  new-data) 

( insup  _tp  _sl ) 

(keyl  _tp  _sl)) 

((up1-1  file! 

(onlywelds  x) 

(upl-la  file)) 

((ask image  "new  image") 

(SMENU  _chc  ("enter  new  name"  "input  file")  "which  file?"  5 30  1 1 15) 
(entf i le  _chc)) 

((askimage  _fl) 

(askproc  _fl)) 

((dell  X) 

(aplnm  _ap) 

(opn  "Deleting  data  points") 

(PP) 

(P  " How  do  you  wish  to  proceed  with  deletions") 

(PP) 

(PP) 

(P  " of  selected  data  in  database  named:") 

(PP) 

(PP) 

(P  " " _ap) 

(SMENU  _meth  7"Selected  Data"  All)  "deletion  method"  14  15  1 1 16) 
(della  _meth)) 


((resort  _cat) 

(aplnm  _ap) 

(mtype  _ap  _cat  _ttt) 

(FORALL  ((mtype  _ap  _cat  _x)  (oldav  _ap  _cat  _b  _c  _cz  _x))  ((DELCL  ((oldav  _a 
p _cat  _b  _c  _cz  _x)))  (ADDCL  ((toa  _ap  _a  _b  _c  _cz  _x))T)) 

(FORALL  ((toa  _ap  _cat  _bb  _cc  _ccz  _xx))  ((ADDCL  ((oldav  _ap  _cat  _bb  _cc  _cc 
z _xx)))  (DELCL  ?(toa  _ap  _eat  _bb  _cc  _ccz  _xx)))))) 

((resort  si)) 
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(Cold) 

(aplnm  _ap) 

(men-doe- fac  _tp) 

(men-doe-fac2  _tp  _sl) 

(mtype  _ap  _sl  _x) 

(onlywelds  xx) 

(up2  tp  _sl)) 

((old)  ■ 

(onlywelds  xx) 

(opn  "First  nunber  of  data  points  (n-data)") 

(PP) 

(P  " No  n-data  exist.") 

(up1  addtype)) 

((upl  addtype) 

(opn  new-data) 

(P  " Do  you  wish  to  enter  a new  n-data  value  from  the  keyboard,") 

(PP) 

(PP) 

(P  " or  do  you  wish  to  read  data  from  a file?") 

(SMENU  _chc  (keyboard  file)  "keybd  or  file"  12  25  1 1 15) 

(up1-1  _chc)) 

((gobin  binary) 

(DIR  "*.pix"  _aU) 

(onlywelds  x) 

(EO  alia  ("new  image"]  all)) 

(SMENU  _fl  _alla  "image'file"  5 5 1 1 12) 

(ask image  _fl)) 

((gobin  binary) 

(onlywelds  x)) 

((update  add-ndata) 

(onlywelds  x) 

(upl  addtype)) 

((update  old-ndata) 

(old)) 

((update  sort) 

(resort  x)) 

((update  del-ndata) 

(onlywelds  x) 

(dell  X)) 

((indata  text) 

(onlywelds  x) 

(SMENU  _chc  (old-ndata  add-ndata  del-rxJata)  text  55119) 

(update  _chc)) 

((indata  binary) 

(gobin  binary)) 

((indata  binary)) 

((testP  F-D) 

((testP  F-2)) 

((testP  F-3)) 

((testP  F-4)) 

((testP  F-5)) 

((testP  F-6)) 

((testP  F-7)) 

((oaposi  -1  _x  _po  _t) 

(=  _qo  (j»  + 1)) 

(oapos  _x  _qo  _t)) 

((oaposi  _u  _x  _po  _t) 

(apln  ap) 

(FORALL  ((testP  _fl)  (_fl  _tp))  ((ADDCL  ((oldav  _ap  _tp  0 0 0 _x))  _po)))) 
((oapos  _x  J30  _tt) 

(aplnm  _ap) 

(oldav  uu  _uv  _uw  _uh  _uz  _t) 

(CMP  -r_tt”_t)” 

(CMP  _crTt  _t  _x) 

(oaposi  _crit  _x  _po  _t)) 
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((onlywelds  _x) 

(CUUIND  welds) 

(FORALL  ((wind  _wnd)  (NOT  EQ  _wnd  welds))  ((CLOSE 
((writ  in) 

(onlywelds  x) 

(rewirvd  chart) 

(CUWIND  welds) 

(PP  Enter  nunber  of  types) 

(P) 

(R  nocas) 

(Fw'chart  ((U  4))  (_nocas)) 

(nextwrit  _nocas)) 

((nextwrit  oT 
(CUWIND  chart)) 

((nextwrit  nocas) 

(CUWIND  welds) 

(PP  Enter  title  message  enclosed  in  double  quotati 
(PP) 

(R  _titmes) 

(P  " Enter  nclass  8,  15  or  17") 

(PP) 

(R  _nclass) 

( IbT  _nclass  _lbl ) 

(DATE  da  mo  yr) 

(PP) 

(PP) 

(P  " Enter  krange") 

(PP) 

(R  krange) 

(WrTte  chart  ()) 

(WRITE  chart  (Class  _lbl  _titmes  _da  _mo  _yr)) 

(FW  chart  ((U  4)  (U  4))  ( nclass  krange)! 

(WRITE  chart  ()) 

(tydeg  _krange  0) 

(SUM  _curcas  1 _nocas) 

(PP  _curcas) 

(nextwrit  curcas)) 

(dbl  8 D2H)) 

(dbl  15  D4H)) 

(dbl  17  C3V)) 

((tydeg  _k range  _k range)) 

((tydeg  _krange  _nplac) 

(SUM  _nplac  1 _newpl) 

(PP  Enter  type  and  degree  for  _newpl) 

(R  _typ) 

(R  deg) 

(FW  chart  ((U  4)  (U  4))  (_typ  _deg)) 

(tydeg  _krange  _newpl)) 

((readiti  xx) 

(NOT  EOF  te(ipo2) 

(READ  tempo2  _a) 

(READ  tenpo2  _b) 

(ADDCL  ((mtype  _a  _b))) 

(readiti  xx)) 

((readiti  xx) 

(EOF  tefflpo2) 

(CLOSE  tempo2) 

(DEL  tefnpo2)) 


wnd)))) 


on  marks) 
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((readit  xx) 

(NOT  EOF  tempol) 

(READ  tempol  _a) 

(READ  tempol  _b) 

(READ  tempol  _c) 

(READ  tempol  _d) 

(READ  tempol  _z) 

(READ  tempol  _e) 

(ADDCL  ((oldav  _a  _b  _c  _d  _z  _e))) 

(readit  xx>) 

((readit  xx) 

(EOF  tempol) 

(CLOSE  tempol) 

(DEL  tempol) 

(OPEN  tempo2) 

(readiti  xx)) 

((reread  all) 

(OPEN  tempol) 

(readit  _x)) 

((dumpit  all) 

(CREATE  tempol) 

(FORALL  ((oldav  _a  _b  _c  _d  _z  _e))  ((WRITE  tempol  (_a  _b  _c  _d  _z  _e)))) 
(CLOSE  tempo!) 

(CREATE  tempo2) 

(FORALL  ((mtype  aa  bb))  ((WRITE  tempo2  (_aa  _bb)))) 

(CLOSE  tempo2) 

(redo  XX)) 

((redo  _x) 

(KILL  oldav) 

(KILL  mtype) 

(ADDCL  ((oldav))) 

(ADDCL  ((mtype)))) 

((aplic  x) 

(EXEC  "c:\conmand.com"  ("/c"  "COPY  \COMMAND.COM")  _rtn) 

(rewirvd  " DOE  NE  Performance  Indicator  Data  Analysis  System  ") 

(oldap  1st)) 

((explan  apldel) 

(opn  "Delete  old  Application") 

(P  " Move  arrow  with  space-bar  or  backspace  key.") 

(PP) 

(P  " Select  by  hitting  plus  sign  (<shift>  +)") 

(PP) 

(P  " Deselect  by  hitting  minus  sign  (-)") 

(PP) 

(P  " After  selections  have  been  made,  hit  <enter>")) 

((oldap  1st) 

(opn  instructions) 

(P  " **  Use  Space-Bar  to  Select Then  Hit  Return  **") 

(CUWIND  " DOE  NE  Performance  Indicator  Data  Analysis  System  ") 

(ISALL  _all  _x  (appl  _x)) 

(EQ  _aira  ("Delete  Old  Appl ication" |_al I ) ) 

(EQ  _allb  ("Add  New  Appl ication" |_al la)) 

(SMENU  _curap  _allb  " PDA  (NIST/DOE  Expert  System,  v.  92.2)  " 2 10  1 1 55) 
(useapl  _curap)) 

((bar it  x) 

(aplnm  _nmap) 

(propwind  welds  _tw  _lw  _hw  _ww) 

(CRWIND  welds  _tw  _lw  _hw  _ww) 

(BAR  _nmap  ((indata  (text  binary))  (lists  (F-1  F-2  F-3  F-4  F-5  F-6  F-7))  (disc 
0 ("  - 1 -"  op_sys  " - 2 -"  splitfl_x  " - 3 -"  sav_dosfl  " - 4 -"  sa 

V dpdat  r_dpdat_y))  (analysis  ("  - 1 -"  DATAPLOT  " - 2 -"  Histogram  Pie-Ch 

art  Pareto-Ch  PID-4Q-7F  "20PlotFit"  " - 3 -"  C-Chart  P-Chart  " - 4 -"  Lag- 

Plot  AutocorrP  Predict-!  Predict-2  " - 5 -"  Tests  " - 6 -"  Distribut))  (cl 

ean  (clear  save  exit  restart))))) 
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((closeall  _x) 

(CUWINO  &T) 

(FORALL  ((wind  _y))  ((CLOSE  _y)))) 

( (shortaplnm  "3.  TdaHO  (Idaho  & Albuquerque/EG&G) 

( (shortaplnm  "1.  CH-AN  (Chicago/Argonne) 

( (shortaplnm  "2.  CH-BN  (Chicago/Brookhaven) 

((shortaplnnt  "4.  OAKRI  (Oak  Ridge/Martin  Marietta) 

( (shortaplnm  "5.  RL-WH  (Richlarvd/Westinghouse-Hanford) 
((shortaplnm  "6.  SF-LL  (San  Francisco/Lawrence  Livermore) 
((shortaplnm  "7.  SF-RI  (San  Francisco/Rockwell  International) 
((shortaplnm  "8.  TOTAL  (Group  of  Facilities  with  PI  Data) 
((shortaplnm  " DEMO  (C-Chart/  P-Chart/  Distribution  Chart/) 
((appD) 

((appl  '■  •')) 

DEMO  (C-Chart/  P-Chart/  Distribution  Chart/) 


((appl  " 

((appl  " 

((appl  "1.  CH-AN  (Chicago/Argonne) 

((appl  "2.  CH-BN  (Chicago/Brookhaven) 

((appl  "3.  IDAHO  (Idaho  & Albuquerque/EG&G) 

((appl  "4.  OAKRI  (Oak  Ridge/Martin  Marietta) 

((appl  " 

((appl  "5.  RL-UH  (Richland/Uestinghouse-Hanf ord) 

((appl  "6.  SF-LL  (San  Francisco/Lawrence  Livermore) 

SF-RI  (San  Francisco/Rockwell  International) 


((appl  "7. 


TOTAL  (Group  of  Facilities  with  PI  Data) 


")) 

")) 

")) 

")) 

")) 

")) 

")) 

")) 

")) 

")) 

")) 

")) 


((appl  "8. 

((appl  " 

((propwind  welds  0 0 23  78)) 

((propwind  old-data  8 4 13  75)) 

((propwind  new-data  8 2 15  75)) 

((propwind  n-data-  20  60  2 18)) 

((propwind  chart  5 10  15  65)) 

((propwirxd  retrn  8 38  4 40)) 

((propwind  anita-out  13  0 2 43)) 

((propwind  "To  print  output"  18  0 4 43)) 

((propwind  esc  8 25  2 30)) 

((propwind  "Name  Your  Application"  5 10  10  60)) 

((propwirxJ  "First  nurber  of  data  points  (n-data)"  4 10  7 50)) 
((propwind  observations  8 2 15  75  0 0 4)) 

((propwind  obs-label  622  75)) 

((propwind  cont  2 10  3 65)) 

((propwind  "writing  to  disc"  10  10  5 65)) 

((propwind  "reading  from  disc"  10  10  5 65)) 

((propwind  "new  image  file"  10  10  5 60)) 

((propwind  "current  data"  19  60  3 18)) 

((propwind  "re-format  image  file"  5 11  6 56)) 

((propwind  " DOE  NE  Performance  Indicator  Data  Analysis  System 
((propwind  "input  examples"  13  11  7 56)) 

((propwind  "process  file"  10  20  5 55)) 

((propwind  "Deleting  data  points"  497  65)) 

((propwind  "Select  Deletions"  2 31  20  47)) 

((propwind  "Change  old  data"  4 48  7 28)) 

((propwind  "Continue?"  5 20  5 38)) 

((propwind  "Current  List"  20  50  3 12)) 

((propwind  instructions  22  10  1 57)) 

((propwind  " Meaning  of  Facility  Designation"  5 19  10  58)) 
((propwind  "Delete  old  Application"  19  10  4 47)) 

((propwind  "Explanation  of  dp  file  names"  11  28  8 40)) 


'3. 

IDAHO" 

)) 

'1. 

CH-AN" 

)) 

'2. 

CH-BN" 

)) 

'4. 

OAKRI" 

)) 

'5. 

RL-WH" 

)) 

'6. 

SF-LL" 

)) 

'7. 

SF-RI" 

)) 

'8. 

TOTAL" 

)) 

'0. 

DEMO" 

)) 

0 0 23  78)) 


214 


Fong,  Bernstein  & Filliben  (1992)  on  'PDA:  A PC-based  Expen  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data" 


((useapl  "Add  New  Application") 

(CLOSE  instructions) 

(propwind  "Name  Your  Application"  _tw  Iw  _hw  _ww) 

(CRUIND  "Name  Your  Application"  _tw  _lw  hw  _ww) 

(CURSOR  "Name  Your  Application"  3 10) 

(P  Please  Name  Your  Application) 

(CURSOR  "Name  Your  Application"  5 10) 

(R  _nniap) 

(KILL  aplnm) 

(ADOCL  ((aplnm  _nmap))) 

(ADOCL  ((appl  _nmap))) 

(ADDCL  ((shortaplnm  _nmap  _nmap))) 

(closeall  X) 

(barit  x)) 

((useapl  " ") 

(useapl  " ")) 

((useapl  " ") 

(CLOSE  instructions) 

(oldap  1st)} 

((useapl  "Delete  Old  Application") 

(CLOSE  instructions) 

(ISALL  _all  _x  (appl  _x)) 

(explan  apldel) 

(MMENU  _de  ()  _all  "Applications  to  Delete"  5 5 10  1 55) 

(FORALL  ((ON  _y  _de))  ((elimi  _y)  (elimZ  _y)  (DELCL  ((appl  _y)))  (DELCL  ((shortaplnm  _y  _z))))) 
(closeall  X) 

(aplic  X)) 

((useapl  _oldname) 

(KILL  aplnm) 

(ADDCL  ((aplnm  _oldname))) 

(closeall  X) 

(barit  x)) 

((elimi  _y) 

(FORALL  ((oldav  _y  _u  _v  _w  _z))  ((DELCL  ((oldav  _y  _u  _v  _w  _2)))))) 

((elim2  _y) 

(FORALL  ((mtype  _y  _h))  ((DELCL  ((mtype  _y  _h)))))) 

((go2  _tp  _ndat  _sl  _olne) 

(onlywelds  x) 

(opn  n-data-) 

(P  " " _ndat) 

(CUWIND  welds) 

(aplnm  _ap) 

(oldav  _ap  _sl  _xp  _yp  _zp  _rxiat) 

(go3  _tp  _ndat  _sl  _xp  _yp  _zp  _olne)) 

((gola  _tm  _fk) 

(SMENU  _q  (enter-data  see-all)  next-choice  16  10  1 1 10) 

(go2  _tm  _flc  _q)> 

((aplnm  "3.  IDAHO  (Idaho  & Albuquerque/EG&G)  ")) 

((gol  _tp) 

(aplnm  ap) 

(CLOSE  old-data) 

(CLOSE  new-data) 

(CLOSE  chart) 

(ISALL  all  x ( tp  ap  x)) 

(SMENU  ~fk  _all  testPs  5*5  1 1 9) 

(gola  fk  _tp)) 

((readi  _fname  _ap  _run  _xp  _yp  _zp  _q) 

(mtype  _ap  _run  _q) 

(ADDCL  ((oldav  _ap  _run  _xp  _yp  _zp  _q))) 

(reading  _fname  _ap  _run  _q)) 

((readi  _fname  _ap  _run  _xp  _yp  _zp  _q) 

(ADDCL  ((mtype  _ap  _run  _qT)) 

(ADDCL  ((oldav  _ap  _run  _xp  _yp  _zp  _q))) 

(reading  _fname  _ap  _run  _q)) 
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((readi  _fname  _ap  _rtjn  _q) 

(mtype  _ap  _rur  _q) 

(DELCL  7<mtype  _ap  _run  _q))) 

(readZ  _fname  _ap  _rtjn  _q)) 

((readi  _fname  _ap  _run  _q) 

(readZ  _fname  _ap  _run  _q)) 

((readZ  _fname  _ap  _run  _q) 

(oldav  _ap  _run  _a  _b  _z  _q) 

(DELCL  ((oldav  _ap  _run  _a  _b  _z  _q))) 

(reads  _fname  _ap  _run  _q)) 

((readZ  _fnanie  _ap  _run  _q) 

(reads  _fname  _ap  _run  _q)) 

((reads  _fname  _ap  _run  _q) 

(NOT  EOF  fname) 

(FR  _fname  ((S  19))  (_xpp)) 

(READ  fnaine  yp) 

(FR  _fnan)e  ((S  Z))  (_w)) 

(STRINGOF  _xpp  _xp) 

(ADDCL  ((mtype  _ap  _run  _q))) 

(read4  _fnante  _ap  _run  _xp  _yp  _w  _q)) 

((reading  fname  ap  run  _p) 

(=  _q  (3  + 1))“ 

(readi  _fname  _ap  _run  _q)) 

((reading  _fname  _ap  _run  jd) 

(EOF  fname) 

(CLOSE  _fname)) 

((read4  _fname  _ap  _run  _xp  _yp  ')  _q) 

(READ  _fname  zp) 

(FR  _fname  ((S  Z))  (_w)) 

(ADDCL  ((oldav  _ap  _run  _xp  _yp  _zp  _q))) 

(reading  _fname  _ap  _run  _q)) 

((readA  _fname  _ap  _run  _xp  _yp  _w  _q) 

(ADDCL  ((oldav  _ap  _run  _xp  _yp  -1  _q))) 

(reading  _fname  _ap  _run  _q)T 
((add-db  _ap  _rn  jo) 

(mtype  _ap  _p) 

(add-dbl  _ap  _rn  _p)) 

((add-db  _ap  _rn  _p) 

(ADDCL  ((mtype  _ap  _p))) 

(add-dbl  ap  rn  _p)) 

((delZ  All)” 

(rewind  "Deleting  data  points") 

(PP) 

(PP) 

(P  " Are  you  sure?") 

(SMENU  _chc  (yes  no)  "last  chance"  14  10  1 1 11)) 
((opn  _wnd) 

(propwind  _wixl  _tw  _lw  _hw  _ww) 

(CRWIND  _wnd  _tw  _lw  _hw  _ww)) 

((opn  _wnd) 

(propwind  _wnd  _a  _b  _c  _d  _e  _f  _g) 

(CRWIND  _wnd  _a  _b  _c  _d  _e  _f  _gT) 

((explain  files) 

(opn  "Explanation  of  dp  file  names") 

(PP) 

(P  "Z-column  Y and  Z data.  Filename  by  user.") 
(PP) 

(PP) 

(P  "One  colum,  Z,  of  ntribers") 


(PP) 

(P  "Two  colims,  Y and  Z,  of  numbers") 

(PP) 

(P  "Two  columns;  X of  ASCII,  Z of  nurbers") 
(PP) 

(P  "Three  colunns,  X,  Y,  Z,  of  nurbers") 
(CUUIND  chart)) 
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((namefl  _ap  _ft  _fnme  _nn) 

(prmes  _ft  _nn) 

(PP) 

(PP) 

(P  " (Filename  not  to  exceed  8 characters") 

(PP) 

(P  " and  must  begin  with  an  alphabet.)") 

(PP) 

(PP) 

(R  _fnn) 

(caseconv  _fnn  _fnm) 

(namefl2  _ap  _ft  _fnin  _fnme)) 

((spla  _ap  _ft ) 

(spla  _ap  _ft  DAT_F1LE)) 

((spla  _ap  _ft  DAT_FILE) 

(namefl  _ap  _ft  _fnme  1) 

(ckdr  _ap  _ft  _fnnie)) 

((sp1a  _ap  _ft  _7nme) 

(CONCAT  fnn)e~".0AT"  fnmel) 

(CONCAT  "C:\DATAPLOT\"  fnmel  fnme2) 

(PP) 

(PP) 

(ckdr  _ap  _ft  _fnme2)) 

((ckdr  _ap  _ft  _fnme) 

(DIR  _fnme  _lst) 

(ON  fnme  1st) 

(PP)” 

(P  " File  " fnme  " already  exists") 

(PP) 

(PP) 

(P  " Overwrite?  ") 

(SMENU  _count  (yes  no)  continue  18  10  1 1 10) 

(ckdr2  _ap  _ft  _fnme  _count)) 

((ckdr  _ap  _ft  _fnme) 

(spicon  _ap  _ft  _fnme)) 

((sp1-1  ap  ft) 

(PP) 

(P  " Please  choose  DAT_FILE  if  you  wish  to  name  a file") 

(PP) 

(P  " for  storing  Y arxd  Z data  from  a 3-column  X-Y-2") 

(PP) 

(P  " input  file;  or  select  other  file  name  from  menu.") 

(explain  f i les) 

(SMENU  _flrm  (DAT_FILE  OOE_1COL  DOE_2CLA  D0£_2CLB  D0E_3C0L)  "dp  name"  12  14  1 1 9) 

(rewind  chart) 

(spla  _ap  _ft  _flnm)) 

((rewind  _x) 

(closewind  _x) 

(opn  _x)) 

((rewind  _wo  _wn) 

(CUUIN0”&:) 

(CLOSE  _wo) 

(propwind  _wn  _tp  _lft  _hgt  _wdth) 

(CRWIND  _wn  _tp  _lft  _hgt  _wdth)) 

((ckdr2  _ap  _ft  _fnme  yes) 

(spicon  _ap  _ft  _fnme)) 

((ckdr2  _ap  _ft  _fnme  no) 

(rewind  chart) 

(sp1-1  _ap  _ft)) 

((oldav)) 

((mtype)) 
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((spicon  _ap  _ft  “C:\DATAPL0T\D0E_1C0L.DAT") 

(CREATE  "C : \OATAPLOT\DOE_1 COL .DAT" ) 

(OPEN  "C : \DATAPLOT\OOE_-1  COL  .OAT" ) 

(FORALL  ((mtype  _ap  _ft  _tm)  (oldav  _ap  _ft  _xp  _yp  zp  _tm))  ((Iist3-l2  "C:\DATAPLOT\DOE  1C0L.DAT"  _zp))) 
(CLOSE  "C:\DATAPLOT\DOE_TcOL.DAT") 

(PP) 

(PP) 

(PP) 

(PP) 

(PP  Data  recorded  on  "C:\DATAPL0T\D0E  1C0L.DAT")) 

((spicon  ap  ft  "C:\OATAPLOT\DOE_2CLA.DAT") 

(CREATE""C : \DATAPLOT\DOE_2CLA .DAT" ) 


(OPEN  "C:\DATAPLOT\DOE_2CLA.OAT") 

(FORALL  ((mtype  _ap  _ft  _tm)  (oldav  _ap  _ft  _xp  _yp  _zp  _tm))  ((list3-1y  "C:\DATAPLOT\DOE_2CLA.DAT"  _yp  zp))) 
(CLOSE  "C:\DATAPLOT\OOE  2CLA.0AT") 

(PP) 

(PP) 

(PP) 

(PP) 

(PP  Data  recorded  on  "C:\DATAPLOT\DOE_2CLA.DAT")) 

((spicon  ap  ft  "C:\OATAPLOT\OOE  2CLB.DAT") 

(CREATE”"C:\DATAPL0T\D0E  2CLB.DAT") 

(OPEN  "C:\DATAPL0T\D0E_2CLB.DAT") 

(FORALL  ((mtype  ap  ft  _tm)  (oldav  _ap  _ft  _xp  yp  _zp  tm))  ((List3-1xz  "C:\DATAPL0T\D0E  2CLB.0AT"  _xp  _zp))) 
(CLOSE  "C:\DATAPLOT\DOE_2CLB.DAT") 

(PP) 

(PP) 

(PP) 

(PP) 

(PP  Data  recorded  on  "C:\DATAPLOT\DOE_2CLB.DAT")) 

((spicon  _ap  _ft  "C:\DATAPLOT\DOE_3COL.DAT") 

(CREATE~"C : \DATAPLOT\DOE  3C0L.DAT" ) 

(OPEN  "C:\OATAPLOT\DOE_3COL.DAT") 

(FORALL  ((mtype  ap  ft  _tm)  (oldav  ap  ft  xp  _yp  _zp  _tm))  ((list3-1x  "C:\DATAPLOT\DOE_3COL.DAT"  _xp  _yp  _zp))) 
(CLOSE  "C:\DATAPLOT\DOE  3C0L.DAT") 

(PP) 

(PP) 

(PP) 

(PP) 

(PP  Data  recorded  on  "C:\DATAPLOT\DOE_3COL.DAT")) 

((spicon  ap  ft  fnme) 

(CREATE"_fniiie)  " 

(OPEN  _fn(i>e) 

(FORALL  ((mtype  _ap  _ft  _tm)  (oldav  _ap  _ft  _xp  _yp  _zp  _tm))  ((list3-1c  _fnme  _yp  _zp))) 

(CLOSE  _fnme) 

(PP) 

(PP) 

(PP) 

(PP) 

(PP  Data  recorded  on  _fnme)) 

((list3-1z  _fnme  _zp) 

(FU  _frme  ((F  20  10))  (_zp)) 

(WRITE  _fnme  ())) 

((list3-1y  fnme  yp  zp) 

(FU  _frOTe“((F  20  10)  " " (F  20  10))  (_yp  _zp)) 

(WRITE  _frYne  ())) 

((list3-1xz  _fnme  _xp  _zp) 

(FU  fm>e  T(C  25)  " " (F  20  10))  ( xp  zp)) 

(WRITE  _fnine  ())) 

((list3-lx  fnme  xp  yp  _zp) 

(FU  _frme“(<C  25)  " " (F  20  10)  " " (F  20  10))  (_xp  _yp  _zp)) 

(WRITE  _fnme  ())> 
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((list3-1c  _fnme  _yp  -1) 

(FW  fnme  ((U  5)  " ")  ( yp)) 

(WRITE  _frtne  ())) 

((list3-1c  _fnme  _yp  _zp) 

(FW  _fn(T)e  ((U  5)  " " (F  20  10))  (_yp  zp)) 

(WRITE  _frme  ())) 

((list3-1b  _fnfi)e  _yp  -1) 

(FW  fnme  ((U  5)  " ■•)  (_yp)) 

(PP)) 

((list3-1b  fnme  yp  zp) 

(FW  frme”((U  ST  (F~20  10))  ( yp  zp)) 

(PP)) 

((jk  ()  u u)) 

((jk)) 

((frmxlist  _fnfr)e  _lst) 

(conv  _fnme) 

(OPEN  _fr»ne) 

(frmlgo  _fnme  ()  _olst) 

(remvat  _olst  _lst)) 

((runfrm  _y) 

(frmxlist  _y  _lst) 

(PP  _lst))~ 

((takex  fnme  ()) 

(PP) 

(P  " Thank  you.")) 

((takex  _fnme  _lst) 

(xmen  _lst  _x  jjlst) 

(takex2  _fnme  _x  jslst)) 

((takex2  fnme  exit  joist) 

(PP) 

(P  » Thank  You")) 

((takex2  _fnme  _x  joist) 

(pickx  _fnme  _x) 

(takex  _fnme  joist)) 

((pickx  _fnme  _x> 

(PP) 

(P  " Please  name  output  file") 

(PP) 

(P  " ") 

(R  _gnme) 

(pickx2  _fnme  _gnme  _x) 

(cleanfiTe  _gnme)) 

((be  nice) 

(clean  clear)) 

((pickx2  _fnme  exit  _x) 

(be  nice)) 

((pickx2  _fnme  _gnine  _x) 

(CREATE~_gnme) 

(OPEN  _fnme) 

(OPEN  _gnme) 

(pickxon  _fnme  _gnme  _x)) 

((cleanfile  _fname) 

(REN  _fname  ooojjj) 

(EXEC~"c I eanfl.exe"  ()  _ret) 

(REN  oookkk  _fname) 

(DEL  ooojjj)) 

((pickxon1-a  _fnme  _gnme  _x  _xx  _xl) 

(ON  "-a"  _xT) 

(CLOSE  _fnme) 

(CLOSE  _gnme)) 

((pickxon1-a  _fnme  _gnme  _x  _xx  _xl) 

(READ  fnme  _y) 

(READ  “fnme  "z) 

(FR  _fnme  ((C  2))  (_h)) 

(pickxoni  _fnme  _gnme  _x  _xx  _y  _z)) 
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((pickxon  fmne  gnme  _x) 

(EOF  Jrme) 

(CLOSE  _fnme) 

(CLOSE  ~gnme)) 

((pickxon  fntne  gnme  x) 

(FR  fnme  ((C  19))  (^xx)) 

(STrTnGOF  _xl  _xx) 

(pickxonl-a  _fnn)e  _gnme  _x  _xx  _xl)) 

((pickxoni  fnme  gnme  x x y z) 

(FW  _gnme"((U  19)  (U  5)  (F  21  TO))  ( x _y  _z)) 
(WRITE  _grwie  ()) 

(pickxon  _fnme  _gnme  _x)) 

((pickxoni  fnme  gnme  x _xx  y _z) 
(STRINGOF“_xI  _xx)  “ 

(ON  ''-3"  _xl) 

(pickon  _fnme  _gnme  _x)) 

((pickxoni  _fnme  _gnme  _x  _xx  _y  _z) 

(pickxon  _fnme  _gnme  _x)) 
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Appendix  C 


DATAPLOT  (v.  89.1) 

Categorical  Command  Index 
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I 


I 


DATAPLOT  89.1 
CATEGORICAL 
COMMAND 
INDEX 


James  J.  Fllliben 

National  Institute  of  Standards  and  Technology 
Washington,  D.  C. 


January  1989 
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Graphics  Commands 


ALLAN  STAN  DEVIATION  PLOT 
ALLAN  VABIANCE  PLOT 
AMPLITUDE  SPECTRAL  PLOT 
ANOP  PLOT 

ARGAND  SPECTRAL  PLOT 
AUTOCORRELATION  PLOT 
AUTOCORRELATION  STAT  PLOT 
AUTOSPECTRAL  PLOT 


GR-CO  Generate  an  Allan  stand,  dev.  plot 

GR-CO  Generate  an  Allan  variance  plot 

GR-CO  Generate  aaplitude  spectral  plot 

GR-CO  Generate  ANOP  plot 

GR-CO  Generate  argand  spectral  plot 

GR-CO  Generate  autocorrelation  plot 

GR-CO  Generate  autocorrelation  (vs.  subset)  plot 

GR-CO  Generate  autospectral  plot 


BETA  PROBABILITY  PLOT 
...  BIHISTOGRAM 
BINOMIAL  PROBABILITY  PLOT 
BOX  COX  LINEARITY  PLOT 
BOX  PLOT 

BOX-COX  HOMOSCED  PLOT 
BOX-COX  NORMALITY  PLOT 


GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 


beta  probability  plot 
(counts  k relative)  bihistograo 
binomial  probability  plot 
linearity  plot  (Box-Cox  family) 
box  plot 

homosced.  plot  (Box-Cox  family) 
normality  plot  (Box-Cox  family) 


C CHART 

CAUCHY  PROBABILITY  PLOT 
CHI-SQUARED  PPCC  PLOT 
CHI-SQUARED  PROB  PLOT 
CO -SPECTRAL  PLOT 
COHERENCY  SPECTRAL  PLOT 
COMPLEX  DEMOD  AMPL  PLOT 
COMPLEX  DEMOD  PHASE  PLOT 
...  CONTROL  CHART 
CONTOUR  PLOT 
. . . CORRELATION  PLOT 
COUNTS  PLOT 
CROSS -CORRELATION  PLOT 
CROSS-PERIODOGRAM 
CROSS-SPECTRAL  PLOT 


GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 


C control  chart 
Cauchy  probability  plot 
chi-squared  prob  plot  corr  cf  plot 
chi-squared  probability  plot 
co-spectral  plot 
coherency  spectral  plot 
complex  demodulation  amp.  plot 
complex  demodulation  phase  plot 
mean,  sd,  or  range  control  chart 
contour  plot 

auto-  or  cross-correlation  plot 
counts  (vs.  subset)  plot 
cross-correlation  plot 
cross -periodogram 
cross-spectral  plot 


. . . DECILE  PLOT 
DOUBLE  EXPO  PROB  PLOT 


GR-CO  Generate  decile  (vs.  subset)  plot 
GR-CO  Generate  double  exp.  probability  plot 


ERROR  BAR  PLOT  GR-CO  Generate 
EXPO.NENTIAL  PROB  PLOT  GR-CO  Generate 
EXTR  VALUE  TYPE  1 PROB  PLOT  GR-CO  Generate 
EXTR  VALL^  TYPE  2 PPCC  PLOT  GR-CO  Generate 
EXTR  VALLT:  TYPE  2 PROB  PLOT  GR-CO  Generate 


error  bar  plot 

exponential  probability  plot 
ext.  val.  type  1 probability  plot 
ext.  val.  type  2 prob  plot  cc  plot 
ext.  val.  type  2 probability  plot 


F PROBABILITY  PLOT 
FRACTAL  PLOT- 
. . . FREQIXNCY  PLOT 


GR-CO  Generate  F probability  plot 
GR-CO  Generate  fractal  plot 

GR-CO  Generate  frequency  plot — cum/rel/cum  rel 
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GAIN  SPECTRAL  PLOT 

GR-CO 

Generate 

GAm  PPCC  PLOT 

GR-CO 

Generate 

GAifliA  PROBABILITY  PLOT 

GR-CO 

Generate 

GEOMETRIC  PPCC  PLOT 

GR-CO 

Generate 

GEOMETRIC  PROB  PLOT 

GR-CO 

Generate 

EALFNORMAL  PROB  PLOT 

GR-CO 

Generate 

. . . HINGE  PLOT 

GR-CO 

Generate 

...  HISTOGRAM 

GR-CO 

Generate 

HOMOSCEDASTICITY  PLOT 

GR-CO 

Generate 

I PLOT 

GR-CO 

Generate 

KURTOSIS  PLOT 

GR-CO 

Generate 

...  LAG  PLOT 

GR-CO 

Generate 

LINEAR  CORRELATION  PLOT 

GR-CO 

Generate 

LIN’EAR  INTERCEPT  PLOT 

GR-CO 

Generate 

LINEAR  RESSD  PLOT 

GR-CO 

Generate 

LINEAR  SLOPE  PLOT 

GR-CO 

Generate 

LOGISTIC  PROBABILITY  PLOT 

GR-CO 

Generate 

LOGNORMAL  PROBABILITY  PLOT 

GR-CO 

Generate 

LOWER  HINGE  PLOT 

GR-CO 

Generate 

LOWER  QUARTILE  PLOT 

GR-CO 

Generate 

MAXIMUM  PLOT 

GR-CO 

Generate 

ME^N  CONTROL  CHART 

GR-CO 

Generate 

MEAN  PLOT 

GR-CO 

Generate 

MEDIAN  PLOT 

GR-CO 

Generate 

MIDMEAN  PLOT 

GR-CO 

Generate 

MIDRANGE  PLOT 

GR-CO 

Generate 

MINIMUM  PLOT 

GR-CO 

Generate 

NEGATDE  BINO  PROB  PLOT 

GR-CO 

Generate 

NORMAL  PROBABILITY  PLOT 

GR-CO 

Generate 

NP  CHART 

GR-CO 

Generate 

P CHART 

GR-CO 

Generate 

PARETO  PLOT 

GR-CO 

Generate 

PARETO  PPCC  PLOT 

GR-CO 

Generate 

PARETO  PROBABILITY  PLOT 

GR-CO 

Generate 

PERCENT  POINT  PLOT 

GR-CO 

Generate 

...  PERIODOGRAM 

GR-CO 

Generate 

PERIODOGRAM 

GR-CO 

Generate 

PHASE  SPECTRAL  PLOT 

GR-CO 

Generate 

PIE  CHART 

GR-CO 

Generate 

PLOT 

GR-CO 

Generate 

POISSON  PPCC  PLOT 

GR-CO 

Generate 

POISSON  PROBABILITY  PLOT 

GR-CO 

Generate 

. . . PPCC  PLOT 

GR-CO 

Generate 

PPCC  PLOT 

GR-CO 

Generate 

. . . PROBABILITY  PLOT 

GR-CO 

Generate 

gain  spectral  plot 

gamaa  prob  plot  corr  coef  plot 

gamma  probability  plot 

geometric  prob  plot  corr  coef  plot 

geometric  probability  plot 

halfnonnal  probability  plot 
lower/upper  hinge  (vs.  subset)  plot 
histogram — cum/rel/ctua  rel 
homoscedasticity  plot. 

I plot 

kurtosis  (vs.  subset)  plot 

lag  plot  for  a given  lag  number 
linear  corr  (vs.  subset)  plot 
linear  intercept  (vs.  subset)  plot 
linear  res.  sd.  (vs.  subset)  plot 
linear  slope  (vs.  subset)  plot 
logistic  probability  plot 
lognormal  probability  plot 
loner  hinge  (vs.  subset)  plot 
loner  quartile  (vs.  subset)  plot 

maxima  (vs.  subset)  plot 
mean  control  chart 
mean  (vs.  subset)  plot 
median  (vs.  subset)  plot 
midmean  (vs.  subset)  plot 
midrange  (vs.  subset)  plot 
minima  (vs.  subset)  plot 

neg.  bin.  probability  plot 
normal  probability  plot 
Np  control  chart 

P control  chart 
Pareto  plot 

Pareto  prob  plot  corr  coef  plot 

Pareto  probability  plot 

percent  point  plot 

auto-  or  cross-periodogram 

auto-periodogram 

phase  spectral  plot 

pie  chart 

plot  of  var  fc/or  func 

Poisson  prob  plot  corr  coef  plot 

Poisson  probability  plot 

prob  plot  corr  coef  plot  (9  fam) 

(Tukey  lambda)  prob  plot  cc  pi 

probability  plot  (24  dist) 
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PRODUCT  PLOT 
PROFILE  PLOT 
PROPORTION  PLOT 


GR-CO  Generate  product  (vs.  subset)  plot 
GR-CO  Generate  profile  plot  (multivar  anal) 
GR-CO  Generate  proportion  (vs.  subset)  plot 


QUADRATURE  SPECTRAL  PLOT 
QUANTILE-QUAJ<TILE  PLOT 
. . . QUARTILE  PLOT 


GR-CO  Generate  quadrature  spectral  plot 

GR-CO  Generate  quantile-quantile  plot 

GR-CO  Generate  lower/upper  quart  (vs.  subset)  plot 


R CHART 

RANGE  CONTROL  CHART 
RANGE  PLOT 
RELATIVE  SD  PLOT 
ROOTOGRAM 
RUN  SEQUENCE  PLOT 
RWIS  PLOT  (FUTURE) 


GR-CO  Generate  range  control  chart  plot 

GR-CO  Generate  range  control  chart 

GR-CO  Generate  range  (vs.  subset)  plot 

GR-CO  Generate  relative  st.  dev.  (vs.  subset)  plot 

GR-CO  Generate  rootograo 

GR-CO  Generate  run  sequence  plot 

GR-CO  Generate  runs  plot 


S CHART 

SEia-CIRULAR  PROB  PLOT 
SINE  AMPLITUDE  PLOT 
SINE  FREQUENCY  PLOT 
SKEWNESS  PLOT 
. . . SPECTRAL  PLOT 
SPECTRAL  PLOT 
STAN  DEVI  OF  THE  MEAN  PLOT 
STAN  DEVI  CONTROL  CHART 
STANDARD  DEVIATION  PLOT 
STAR  PLOT 

STEM-AND-LEAF  DIAGRAM 
SUM  PLOT 
SYMMETRY  PLOT 


GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 
GR-CO  Generate 


st.  dev.  control  chart  plot 
semi-circ.  probability  plot 
sine  amplitude  (vs.  subset)  plot 
sine  freq.  (vs.  subset)  plot 
skewness  (vs.  subset)  plot 
auto-,  cross-,  etc  spectral  plot) 
(auto-)  spectral  plot 
sd  of  mean  (vs.  subset)  plot 
Stan.  dev.  control  chart 
standard  dev  (vs.  subset)  plot 
star  plot  (multivar  anal) 
stem-and-leaf  diagram 
sum  (vs.  subset)  plot 
a symmetry  plot 


T PPCC  PLOT 
T PROBABILin  PLOT 
TAGUCHI  SN  PLOT 
TAGUCHI  SNL  PLOT 
TAGUCHI  SNS  PLOT 
TAGUCHI  SN2  PLOT 
TRIANGUXAR  PROB  PLOT 
TRIMMED  MEAN  PLOT 
TUKEY  LAMBDA  PPCC  PLOT 
TUKEY  LAMBDA  PROB  PLOT 


GR-CO  Generate  t prob  plot  corr  coef  plot 
GR-CO  Generate  t probability  plot 
GR-CO  Gen  Tag.  (target)  sig/noi  (vs.  subset)  plot 
GR-CO  Gen  Tag.  (large)  sig/noi  (vs.  subset)  plot 
GR-CO  Gen  Tag.  (small)  sig/noi  (vs.  subset)  plot 
GR-CO  Gen  Tag.  (target2)  sig/noi  (vs.  subset)  plot 
GR-CO  Generate  triangular  probability  plot 
GR-CO  Generate  trimmed  mean  (vs.  subset)  plot 
GR-CO  Generate  Tukey  lambda  prob  plot  cc  plot 
GR-CO  Generate  Tukey  lambda  probability  plot 


U CHART 

UNIFORM  PROBABILITY  PLOT 
UPPER  HINGE  PLOT 
UPPER  QUARTILE  PLOT 


GR-CO  Generate  U control  chart 
GR-CO  Generate  uniform  probability  plot 
GR-CO  Generate  upper  hinge  (vs.  subset)  plot 
GR-CO  Generate  upper  quartile  (vs.  subset)  plot 


VARIANCE  OF  THE  MEAN  PLOT  GR-CO  Generate  var.  of  mean  (vs.  subset)  plot 
VARIANCE  PLOT  GR-CO  Generate  variance  (vs.  subset)  plot 


WEIBULL  PLOT 
WEIBUIL  PPCC  PLOT 


GR-CO  Generate  Weibull  plot 

GR-CO  Generate  Weibull  prob  plot  corr  coef  plot 
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WEIBULL  PROBABILITY  PLOT 
nNDSORIZED  kEAK  PLOT 

GR-CO  Generate  Weibull  probability  plot 

GR-CO  Generate  Winsorized  mean  (vs.  subset)  plot 

YOUDEN  PLOT 

GR-CO  Generate  Youden  plot 

XBAR  CHART 

GR-CO  Generate  xbar  (=  mean)  control  chart  plot 

3- D  PLOT 

4- PLOT 

GR-CO  Generate  3-dimensional  plot  of  var  k/or  func 
GR-CO  Generate  4-plot  univariate  analysis  plot 

226 


Fong,  Bernstein  <St  Filliben  (1992)  on  PDA:  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  Indicator  Data 


|Word  Chart/Schematics  Commands 


AMPLIFIER 

wc-co 

AND 

wc-co 

ANGLE 

wc-co 

ANGLE  UNITS 

wc-co 

ARC 

wc-co 

ARROW 

wc-co 

BACKGROUND  COLOR 

wc-co 

BOX 

wc-co 

CAPACITOR 

wc-co 

CASE 

wc-co 

CH 

wc-co 

CIRCLE 

wc-co 

COLOR 

wc-co 

COPY 

wc-co 

CR 

wc-co 

CRLF 

wc-co 

CROSS-HAIR  (or  CH) 

wc-co 

CUBE 

wc-co 

DIAMOND 

wc-co 

DRAW 

wc-co 

ELLIPSE 

wc-co 

ERASE 

wc-co 

FILL 

wc-co 

FONT 

wc-co 

GROUND 

wc-co 

HEIGHT 

wc-co 

HEXAGON 

wc-co 

HORIZONTAL  SPACING 

wc-co 

HW 

wc-co 

INDUCTOR 

wc-co 

JUSTIFICATION 

wc-co 

LATTICE 

wc-co 

LF 

wc-co 

LINT  THICKNESS 

wc-co 

Draw  as  amplifier 

Draw  an  and  box 

Set  angle  for  TEXT  strings 

Define  angle  units  for  ANGLE  command 

Draw  an  arc 

Draw  an  arrow 

Set  color  of  background  after  next  ERASE 
Draw  a box 

Draw  a capacitor 

Set  case  of  letters  (UPPER,  LOWER) 

Activate  and  read  cross-hair  (0  to  100) 

Draw  a circle 

Set  color  of  TEXT  letters  (RED,  BLUE,  etc) 
Copy  the  current  scr  onto  local  hardcopier 
Set  automatic  carriage  return  after  TEXT 
Set  auto  carr  return/line  feed  after  TEXT 
Activate  and  read  cross-hair  (0  to  100) 

Draw  a cube 

Draw  a diamond 
Draw  a line 

Draw  an  ellipse 

Erase  the  current  screen 

Set  fill  switch  (ON/OFF)  for  TEXT  figure 
Set  font  for  letters  (TRIPLEX,  COMPLEX,  etc) 

Darw  a ground 

Set  height  of  letters  (0  to  100) 

Draw  a hexagon 

Set  horiz.  spacing  between  char  (0  to  100) 
Set  height  and  width  of  letters 

Draw  an  inductor 

Set  justif  of  text  (LEFT,  CENTER,  RIGHT) 
Draw  a lattice 

Set  automatic  line  feed  after  TEXT 
Set  thickness  of  lines  (0  to  100) 
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LINES 

wc-co 

Set  line  type  for  figures  (SOLID,  DOT,  etc) 

kARGIN 

wc-co 

Set  posit  (0  to  100)  for  carr  ret  after  TEXT 

MOVE 

WC-CO 

Move  to  a point 

NAND 

WC-CO 

Draw  a nand  box 

NOR 

wc-co 

Draw  a nor  box 

OR 

wc-co 

Draw  an  or  box 

OVAL 

wc-co 

Draw  an  oval 

POINT 

wc-co 

Draw  a point 

PROMPT 

wc-co 

Set  switch  (ON/OFF)  for  prompt 

PYRAMID 

wc-co 

Draw  a pyramid 

REGION  FILL 

wc-co 

Set  fill  switch  (ONXX/OFF)  for  reg  (fe  3d) 

RESISTOR 

wc-co 

Draw  a resistor 

RING  BELL 

wc-co 

Ring  the  bell 

SEMI-CIRCLE 

wc-co 

Draw  a semi-circle 

SPACING 

wc-co 

Set  spacing  (equal/proportional)  for  TEXT 

SPIKE  COLOR 

wc-co 

Set  color  for  spikes 

SPIKE  PATTERN 

wc-co 

Set  line  pattern  for  spikes 

SPIKE  THICKNESS 

wc-co 

Set  thickness  for  spikes 

TEXT 

wc-co 

Write  out  text 

THICKNESS 

wc-co 

Set  thickness  of  TEXT  letters  (0  to  100) 

TRIANGLE 

wc-co 

Draw  a triangle 

VERTICAL  SPACING 

wc-co 

Set  vert,  spacing  between  lines  (0  to  100) 

IIDTH 

wc-co 

Set  width  of  letters  (0  to  100) 
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Analysis  Commands 


ANOVA 

AN-CO 

CONFIDENCE  LIMITS  MEAN 

AN-CO 

EXACT  . . . RATIONAL  FIT 

A.N-C0 

...  FIT 

AN-CO 

LET 

AN-CO 

LET  FUNCTION 

AN-CO 

LOWESS  SMOOTH 

AN-CO 

MEDIAN  POLISH 

AN-CO 

ORTHOGONAL  FIT  [FUTURE] 

AN-CO 

...  PRE-FIT 

AN-CO 

RUNS 

AN-CO 

...  SMOOTH 

AN-CO 

. . . SPLINE  FIT 

AN-CO 

SUMMARY 

AN-CO 

T TEST 

AN-CO 

TABULATE 

AN-CO 

TABULATE  COUNTS 

AN-CO 

TABULATE  MEANS 

AN-CO 

TABULATE  RANGES 

AN-CO 

TABULATE  SD 

AN-CO 

YATES  ANALYSIS 

AN-CO 

Perform  analysis  of  variance 

Compute  confidence  limits  for  mean 

Perform  exact  rational  function  fit 

Perform  1st  sq  lin/poly/multilin/non-lin  fit 

Define  var  £ param;  calc  stat;  roots/dif  etc 
Define  k operate  on  func;  differentiate 
Perform  locally-weighted  scat,  plot  smoothin 

Perform  analysis  of  variance 

Carry  out  a least  squares  orthogonal  fit 

Perform  pre-fit  analysis  for  starting  values 

Carry  out  runs  analysis 

Perform  smoothing  of  equi-spaced  data 
Perform  spline  fit 
Compute  summary  statistics 

Carry  out  1-  or  2-sample  t test 
Tabulate  counts  of  distinct  values  of  a var 
Tabulate  counts  of  var  1 based  on  var  2 
Tabulate  means  of  var  1 based  on  var  2 
Tabulate  ranges  of  var  1 based  on  var  2 
Tabulate  st.  devs.  of  var  1 based  on  var  2 

Carry  out  Yates  analysis  of  2**k  design 
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Plot  Control  Commands 

% 


ARROW  ...  COLOR 

PC-CO 

Set 

ARROW  ...  COORDINATES 

PC-CO 

Set 

BACKGROUND  COLOR 

PC-CO 

Set 

BAR 

PC-CO 

Set 

BAR  BASE 

PC-CO 

Set 

BAR  BORDER  COLOR 

PC-CO 

Set 

BAR  BORDER  LINE 

PC-CO 

Set 

BAR  BORDER  THICKNESS 

PC-CO 

Set 

BAR  DIMENSION 

PC-CO 

Set 

BAR  DIRECTION 

PC-CO 

Set 

BAR  FILL 

PC-CO 

Set 

BAR  FILL  COLOR 

PC-CO 

Set 

BAR  PATTERN 

PC-CO 

Set 

BAR  PATTERN  COLOR 

PC-CO 

Set 

BAR  PATTERN  LINE 

PC-CO 

Set 

BAR  PATTERN  LINE  TYPE 

PC-CO 

Set 

BAR  PATTERN  SPACING 

PC-CO 

Set 

BAR  PATTERN  THICKNESS 

PC-CO 

Set 

BAR  WIDTH 

PC-CO 

Set 

BELL 

PC-CO 

Set 

BOX  ...  COLOR 

PC-CO 

Set 

BOX  ...  COORDINATES 

PC-CO 

Set 

CHARACTERS 

PC-CO 

Set 

CHARACTER  ^NGLE 

PC-CO 

Set 

CHARACTER  COLORS 

PC-CO 

Set 

CHARACTER  FILL 

PC-CO 

Set 

CHARACTER  H^' 

PC-CO 

Set 

CHARACTER  JUSTIFICATION 

PC-CO 

Set 

CHARACTER  OFFSET  . . . 

PC-CO 

Set 

CHARACTER  SIZES 

PC-CO 

Set 

CHARACTER  WIDTH 

PC-CO 

Set 

EYE  COORDINATES 

PC-CO 

Set 

...FRAME 

PC-CO 

Set 

.. .FRAME  COLOR 

PC-CO 

Set 

FRAME  COORDINATES 

PC-CO 

Set 

GRID  COLOR 

PC-CO 

Set 

GRID  PAHERN 

PC-CO 

Set 

. . .GRID 

PC-CO 

Set 

HARDCOPY 

PC-CO 

Set 

colors  for  arrows  on  plots 
location  of  arrows  on  plots 

color  of  background  (=  inside  fraae) 
switch  (ON/OFF)  for  bars  on  plots 
base  location  for  bars  on  plots 
color  of  border  on  bars 
line  type  for  border  on  bars 
thickness  of  border  on  bars 
bar  dimension  to  2d  or  3d 
bar  dirction  (H/V) 

switch  (ONXX/OFF)  for  bar  fill  subregion 
(background)  color  of  bar  fill 
type  of  pattern  for  bar  fill 
line  color  in  bar  fill  pattern 
pattern  line  type  within  bars 
line  type  in  fill  pattern 
line  spacing  in  bar  fill  pattern 
line  thickness  in  bar  fill  pattern 
width  for  bars  on  plots 
automatic  pre-plot  bell  (ON/OFF) 
colors  for  box  frame  on  plots 
location  of  boxes  on  plots 

plot  character  types  (X,  SQUARE,  etc) 
angle  (in  deg)  for  characters  on  plot 
colors  for  characters  on  plots 
fill  switch  (ON/OFF)  for  char,  on  plot 
height  k width  for  characters  on  plot 
justification  for  characters  on  plot 
offset  (displacement)  for  char  on  plot 
size  (height)  for  characters  on  plot 
width  for  characters  on  plots 

eye  position  for  3-dimensional  plot 

switch  (ON/OFF)  for  frames  on  plots 
colors  for  frame  on  plots 
plot  frame  location  and  shape 

color  for  grid  on  plots 

line  type  for  grid  on  plots 

swch.  (ON/OFF)  for  (major)  grid  on  plots 

auto  copy  of  plots  to  loc  hdcpy  (ON/OFF) 
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. . .LABEL 

PC-CO 

Set 

. . .LABEL  COLOR 

PC-CO 

Set 

. . .LABEL  SIZE 

PC-CO 

Set 

LEGEND  ... 

PC-CO 

Set 

LEGEND  ...  COLOR 

PC-CO 

Set 

LEGEND  ...  COORDINATES 

PC-CO 

Set 

LEGEND  ...  SIZE 

PC-CO 

Set 

LEGEND  — 

PC-CO 

Set 

. . .LIMITS 

PC-CO 

Set 

LINE  COLORS 

PC-CO 

Set 

LINE  THICKNESS 

PC-CO 

Set 

LINES 

PC-CO 

Set 

. . .LOG 

PC-CO 

Set 

MAJOR  . . .TIC  NUMBER 

PC-CO 

Set 

MARGIN  COLOR 

PC-CO 

Set 

. . .MAXIMUli 

PC-CO 

Set 

. . .MINIMUM 

PC-CO 

Set 

MINOR  . . .TIC  NUMBER 

PC-CO 

Set 

MINOR  GRID 

PC-CO 

Set 

MULTIPLOT 

PC-CO 

Set 

labels  at  sides  k.  bottoo  of  plot 

colors  for  labels  on  plots 

size  (height)  for  labels  on  plots 

text  for  plot  legends 

color  for  legends  on  plots 

plot  legend  positioning 

size  (height)  for  legends  on  plots 

legend  height  k width 

limits  (min  and  max)  for  plot  frame 

colors  for  lines  (plots  k figures) 

thicknesses  of  lines  (plots  k figures) 

line  types  (SOLID,  DOT,  etc.)  on  plots 

switch  (ON/OFF)  for  log  scale  on  plots 

number  of  major  tics  on  plots 
color  of  margin  (=  outside  frame) 
maxima  to  appear  on  plot  frame 
minima  to  appear  on  plot  frame 
number  of  minor  tics  on  plots 


switch  (ON/OFF)  for  minor  grid  on  plots 
number  of  rows  £ columns  for  multiplot 
MULTIPLOT  COORDINATES  PC-CO  Change  default  global  coor.  for  MULTIPLOT 


ORIGIN  COORDINATES 

PC-CO 

Set 

PEDESTAL  HEIGHT 

PC-CO 

Set 

PRE-ERASE 

PC-CO 

Set 

PRE-SORT 

PC-CO 

Set 

PREPLOT 

PC-CO 

Set 

reference  origin  for  S-dimensional  plot 

height  for  3-d  pedestal 
switch  (ON/OFF)  for  auto-erase  bef  plots 
automatic  pre-plot  sort  (ON/OFF) 
graphics  device  for  pre-plot  strings 


SEGMENT  ...  COLOR 

PC-CO 

Set 

SEGMENT  ...  COORDINATES 

PC-CO 

Set 

SEQUENCE 

PC-CO 

Set 

SPIKE 

PC-CO 

Set 

SPIKE  BASE 

PC-CO 

Set 

SPIKE  DIRECTION- 

PC-CO 

Set 

SPIKE  LINE 

PC-CO 

Set 

colors  for  line  segments  on  plots 
location  of  line  segments  on  plots 
auto-seq-numbering  for  plots  (ON/OFF) 
switch  (ON/OFF)  for  spikes  on  plots 
base  location  for  spikes  on  plots 
spike  direction  (H/V) 
line  types  for  spikes  on  plots 


. . .TIC 

...TIC  COLOR 
. . .TIC  LABEL 
. . .TIC  LABEL  COLOR 
. . .TIC  LABEL  CONTENTS 
. . .TIC  LABEL  DECIMALS 
...TIC  LABEL  FORMAT 
. . .TIC  LABEL  HW 
. . .TIC  LABEL  SIZE 
. . .TIC  POSITION 
. . .TIC  SIZE 
TIC  LABEL  DECHL^LS 
TIC  LABEL  WH 


PC-CO  Set  existence  (ON/OFF)  for  tic  marks 
PC-CO  Set  color  of  tic  marks  on  plots 
PC-CO  Set  switch  (ON/OFF)  for  tic  mark  labels 
PC-CO  Set  color  for  tic  mark  labels 
PC-CO  Specify  (alphabetic)  contents  for  tic  labels 
PC-CO  Set  number  of  decimals  for  plot  tic  labe 
PC-CO  Set  format  (alpha,  exp,  etc)  for  tic  labels 
PC-CO  Set  height/width  of  tic  labels 
PC-CO  Set  tic  mark  label  size  (=  height) 

PC-CO  Set  plot  tic  mark  position  (in/out/thru) 
PC-CO  Set  plot  tic  mark  size 
PC-CO  Set  number  of  decimals  for  tic  labels 
PC-CO  Set  tic  label  height  k width 
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TITLE 

PC-CO 

TITLE  COLOR 

PC-CO 

TITLE  SIZE 

PC-CO 

VISIBLE  [future] 

PC-CO 

...WEIBULL  SCALE 

PC-CO 

WINDOW  COORDINATES 

PC-CO 

Set  title  at  top  of  plot 
Set  color  for  title  on  plots 
Set  plot  title  size  (height) 

Set  3-d  bkgrd  lines  visibility  (ON/OFF) 

Set  scale  for  plots  to  be  Weibull 
Set  graphics  region  coor.  (0  to  100) 


|Graphics  Output  Device  Coiraaands 


BATCH 

GD-CO 

DEVICE  ... 

GD-CO 

DEVICE  ... 

COLOR 

GD-CO 

DEVICE  ... 

PICTURE  POINTS 

GD-CO 

DEVICE  ... 

POWER 

GD-CO 

DEVICE  ... 

TEKTRONH  4010 

GD-CO 

DEVICE  ... 

TEKTRONIX  4014 

GD-CO 

DEVICE  ... 

TEKTRONIX  4105 

GD-CO 

DEVICE  ... 

TEKTRONIX  4662 

GD-CO 

DEVICE  ... 

REGIS 

GD-CO 

DEVICE  ... 

HP-GL 

GD-CO 

DEVICE  ... 

HP  2623 

GD-CO 

DEVICE  ... 

HP  7221 

GD-CO 

DEVICE  ... 

GENERAL 

GD-CO 

DEVICE  ... 

GENERAL  CODED 

GD-CO 

DISCRETE 

GD-CO 

GENERAL 

GD-CO 

GENERAL  (CODED) 

GD-CO 

HP-GL 

GD-CO 

HP  2623 

GD-CO 

HP  7221 

GD-CO 

PICTURE  POINTS  (or  PP) 

GD-CO 

REGIS 

GD-CO 

TEKTRONIX 

4010 

GD-CO 

TEKTRONIX 

4014 

GD-CO 

TEKTRONIX  4105 

GD-CO 

TEKTRONH  4662 

GD-CO 

Set  dev  1 to  130-char  alpha  dev 

Set  dev  1/2/3  manufacturer 
Set  dev  1/2/3  color  (ON/OFF) 

Set  dev  1/2/3  num  of  pic  pts 
Set  dev  1/2/3  power  (ON/OFF) 

Set  dev  1/2/3  to  Tekt  4010  class 
Set  dev  1/2/3  to  Tekt  4014  class 
Set  dev  1/2/3  to  Tekt  4105  class 
Set  dev  1/2/3  to  Tekt  4662 
Set  dev  1/2/3  to  DEC  REGIS  class 
Set  dev  1/2/3  to  EP-GL  class 
Set  dev  1/2/3  to  HP  2623 
Set  dev  1/2/3  to  HP  7221 
Set  dev  1/2/3  to  dev-indep 
Set  dev  1/2/3  to  coded  dev-indep 
Set  dev  1 to  70-char  alpha  dev 

Set  dev  1 to  device-indep 
Set  dev  1 to  coded  device-indep 

Set  dev  1 to  HP-GL  class 
Set  dev  1 to  HP  2623 
Set  dev  1 to  HP  7221 

Set  dev  1 nun  of  pict  pts 

Set  dev  1 to  DEC  Regis  class 

Set  dev  1 to  Tekt  4010  class 
Set  dev  1 to  Tekt  4014  class 
Set  dev  1 to  Tekt  4105  class 
Set  dev  1 to  Tekt  4662 
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Input/Output  Commands 


COLUMN  LIMITS 

lO-CO 

END  OF  DATA 

lO-CO 

PRINT 

lO-CO 

READ 

lO-CO 

READ  FUNCTION 

lO-CO 

READ  MATRIX 

lO-CO 

READ  PARAMETER 

lO-CO 

READ  STRING 

lO-CO 

ROW  LIMITS 

lO-CO 

SERIAL  READ 

lO-CO 

SKIP 

lO-CO 

WRITE 

lO-CO 

WRITE  • • 

lO-CO 

Set  col  lists  for  READ  k SERIAL  READ 
Define  end  dstB  for  READ  k SERIAL  READ 
Write  (terninal/f ile)  vet,  petes,  func 
Resd  vErisbles 

Resd  1 line  of  functions  (=  READ  STRING) 

Read  in  a satrix 

Read  one  line  of  paraseters. 

Read  one  line  of  strings  (=  READ  FUNCTION) 
Set  row  lists  for  READ  and  SERIAL  READ 

Read  variables  serially 

Set  nus  of  header  lines  to  skip  for  READ 

Write  (tersinal/f ile)  var,  paras,  func 
Write  (tersinal/file)  a literal  text  string 
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Support  Commands 


ANOP  LIMITS  SU-CO  Set  limits  for  region  in  ANOP  Plot 

APPEND  SU-CO  Append  one  vmr  to  end  of  vtotber  v&r 


BAUD  RATE 

BUGS 

BYE 


SU-CO  Set  baud  rate 
SU-CO  List  known  bugs 

SU-CO  Exit  from  DATAPLOT  (=  EHT,  STOP,  etc.) 


CALL 


SU-CO  Execute  a DATAPLOT  subprga  from  file 


♦CAPTURE 


SU-CO  Divert/Capture  text  output  to  a file. 


CLASS  ...LOWER 
aASS  ...UPPER 
aASS  ...WIDTH 
COMMENT 
CREATE 

CURSOR  COORDINATES 
CURSOR  SIZE 


SU-CO  Spec,  first  class  lower  lim  for  HISTOGRAM 
SU-CO  Spec,  last  class  upper  lim  for  HISTOGRAM 
SU-CO  Set  class  width  for  HISTOGRAM 
SU-CO  Insert  a comment  line  in  code 
SU-CO  Create  a subprogram 

SU-CO  Set  cursor  coor  loc  after  PLOT,  ERASE,  etc 
SU-CO  Set  cursor  size  after  a plot 


DEFINE 

DEFINE  POSTHELP 
DEFINE  PREHELP 
DEGREES 
DELETE 

DEMODIXATION  FREQUENCY 
DIMENSION 


SU-CO  Define  general  ASCII  string  commands 
SU-CO  Define  terminal  string  to  succeed  HELP 
SU-CO  Define  terminal  string  to  precede  HELP 
SU-CO  Set  degrees  for  trig  calculations  (ON/OFF) 
SU-CO  Delete  var  or  elements  of  a var 
SU-CO  Set  frequency  for  COMP  DEMOD  . . . PLOT 
SU-CO  Set  dimensions  of  internal  data  storage 


ECHO 

END 


SU-CO  Set  auto  echo  of  command  lines  (ON/OFF) 
SU-CO  Exit  from  DATAPLOT  (=  STOP,  EHT,  etc.) 


♦END  OF  CAPTURE  SU-CO  End  CAPTURing  of  output  to  a file. 


END  OF  CREATE 
END  OF  IF 
END  OF  LOOP 
ERASE  DELAY 
EHT 
EXPERT 
EXTEND 


SU-CO  End  CREATion  of  a subprogram 

SU-CO  Define  end  of  condit-executed  commands 

SU-CO  Terminate  a loop 

SU-CO  Set  delay  factor  for  ERASE 

SU-CO  Exit  from  DATAPLOT  (=  STOP,  END,  etc.) 

SU-CO  Invoke  expert  subsystem 

SU-CO  Extend  one  var  by  (attaching)  another  var 


FEEDBACK 

FENCE 

FILTER  WIDTH 
FIT  ITERATIONS 
FIT  POWER»PRE-FIT 
FIT  STANDARD  DEVIATION 


SU-CO  Allow/suppress  feedback  printing  (ON/OFF) 
SU-CO  Set  fence  switch  (ON/OFF)  for  BOX  PLOT 
SU-CO  Set  filter  width  for  SMOOTH 
SU-CO  Set  upper  bound  on  iterations  for  FIT 
SU-CO  Set  fit  criterion  power  for  PRE-FIT 
SU-CO  Set  lower  bound  on  res  sd  for  FIT 


GRADS 


SU-CO  Set  grads  for  trig  calculations  (ON/OFF) 


HALT 

HARDCOPY  DELAY 


SU-CO  Exit  from  DATAPLOT  (=  STOP,  ENT,  etc.) 
SU-CO  Set  delay  factor  for  hardcopy 


** Added  after  Jan.  1989.  Available  in  all  versions  higher  than  89.1. 
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HELP 

SU-CO 

HOST 

SU-CO 

IF 

SU-CO 

IMPLEMENT 

SU-CO 

KNOTS 

SU-CO 

LIST 

SU-CO 

LIST  ... 

SU-CO 

LIST  CONCLUSIONS 

SU-CO 

LIST  DEFINITIONS 

SU-CO 

LIST  DICTIONARY 

SU-CO 

LIST  DIRECTORY 

SU-CO 

LIST  SAVE 

SU-CO 

LOOP 

SU-CO 

LOWESS  PROPORTION 

SU-CO 

LOWESS  WIDTH 

SU-CO 

MAIL 

SU-CO 

NAME 

SU-CO 

NEGATE 

SU-CO 

NEWS 

SU-CO 

PAUSE 

SU-CO 

POLYNOMIAL  DEGREE 

SU-CO 

PRINTING 

SU-CO 

PROBE 

SU-CO 

PROPORTION  LIMITS 

SU-CO 

QUERY 

SU-CO 

QUIT 

SU-CO 

R 

SU-CO 

RADIANS 

SU-CO 

RENAME 

SU-CO 

REPEAT  (or  R) 

SU-CO 

RESET 

SU-CO 

RESTORE  MEMORY 

SU-CO 

RETAIN 

SU-CO 

ROOT  ACCURACY 

SU-CO 

SAVE 

SU-CO 

SAVE  MEMORY 

SU-CO 

SEARCH 

SU-CO 

SEARCH  DICTIONARY 

SU-CO 

SEARCH  DIRECTORY 

SU-CO 

SEARCH 1 

SU-CO 

SEARCH 1 DICTIONARY 

SU-CO 

SEARCHl  DIRECTORY 

SU-CO 

Print  short  docuoentation  for  a comnand 
Set  host  computer 

Define  start  of  condit-executed  commands 
Activ  local  chg  to  DTPLT.  implement,  (obs) 

Set  knots  variable  for  SPLINE 

List  last  20  (or  sore)  commands  entered 

List  contents  of  a file 

List  DATAPLOT’s  Conclusions  file 

List  current  user-defined  definit  (DEFINE) 

List  DATAPLOT’s  Dictionary  file 

List  DATAPLOT’s  Directory  (=  Master)  file 

List  current  Saved-Commands  file  (SAVE) 

Initiate  a loop 

Set  0 to  1005  width  for  lowess  smooth 
Set  absolute  width  for  lowess  smooth 

Print  message  from  DATAPLOT  service  org 

Assign  (equate)  additional  names  to  a var 
Set  switch  (ON/OFF)  to  negate  vert,  plot 
Print  general  news  from  DATAPLOT  service  org 


Stop  execution  (of  a macro)  until  CR  entered  • 
Set  degree  of  polynomial  in  smoothing;  (obs) 
Allow/suppress  analysis  printing  (ON/OFF) 
Examine  code  settings  (used  by  implementor) 
Set  limits  for  region  in  Proportion  Plot 

Send  query  line  to  DATAPLOT  consultant  file 
Exit  from  DATAPLOT  (=  STOP,  END,  etc.) 

Re-execute  one  previous  command 
Set  radians  for  trig  calculations  (ON/OFF) 
Assign  a different  name  to  a variable 
Re-execute  one  previous  command 
•Zero-out*  all  var,  param,  func,  etc 
Restore  all  saved  var/param/func  from  file 
Retain  var  or  elements  of  a var 
Set  accuracy  for  ROOT  subcommand  under  LET 

Save  selected  LISTed  commands 
Save  all  var/param/func  to  file 
Search  a file  for  all  occurrances  of  string 
Srch  DATAPLOT  Diet,  file  for  all  occ  of  str 
Srch  DATAPLOT  Direc.  file  for  all  occ  of  str 
Search  file  for  1st  occurrance  of  string 
Srch  DATAPLOT  Diet,  file  for  1st  occ  of  str 
Srch  DATAPLOT  Direc.  file  for  1st  occ  of  str 
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SEED 

su-co 

SET 

su-co 

SHOW  READ  FORMAT 

su-co 

STATUS 

SU-CO 

STOP 

su-co 

TERMINATOR  CHARACTER 

su-co 

TRANSLATE 

su-co 

TRIGONOMETRIC  UNITS 

SU-CO 

WEIGHTS 

su-co 

su-co 

/ 

su-co 

Set  seed  for  random  number  generators 
Specify  settings  for  certain  commands 
Shotit  current  format  for  (fast)  READ 
Print  status  of  lines,  char,  var,  par 
Exit  from  DATAPLOT  (=  EXIT,  END,  etc.) 

Set  character  to  terminate  commands 
Define  auto-translation  of  any  graphics 
Set  trigonometric  units 

Set  weights  variable  for  FIT,  PRE-FIT,  etc 

Insert  a comment  line  in  code 
Re-execute  SA'S'Ed  commands. 


r 


Keserved  Words 


AND 

RESW 

AUTOMATIC 

RESW 

B... 

RESW 

CONaUSIONS 

RESW 

DEMODF 

RESW 

DEFAULT 

RESW 

DEMODF 

RESW 

DICTIONARY 

RESW 

DIRECTORY 

RESW 

EXCEPT 

RESW 

FOR 

RESW 

I 

RESW 

INFINITY 

RESW 

LOFCDF 

RESW 

MASTER 

RESW 

Used  with  PLOT,  etc  for  multi-trace  plot 
Set  a switch  to  "automatic*  position 

Params  with  comput.  WEIBULL  PLOT  percent  pts 


Symbolic  name  for  DATAPLOT ’s  Conclus.  file 

Param  with  updated  demod  freq.  (COlfP  DEUOD) 
Set  a switch  to  'default*  position 
Param  with  updated  complex  demodulation  freq 
Symb  name  for  DATAPLOT 's  Dictionary  file 
Symb  name  for  DP’s  Directory  (=  Master)  file 

Qualifier  denoting  excepted  subset 

Qualifier  denoting  elts  or  var  of  interest 

Var  denoting  dummy  index;  used  in  FOR 
Parameter  with  value  'infinity* 

Param  with  lack  of  fit  cdf  val  from  FIT,  etc 

Symb  name  for  DP’s  Directory  (=  Master)  file 
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OFF 

RESW 

Set  a switch  to  "off*  position 

ON 

RESV 

Set  a switch  to  'on*  position 

PI 

RESW 

Parameter  with  value  3.1415926 

FRED 

RESW 

Var  with  predicted  values  from  FIT,  etc 

REPDF 

RESW 

Paran  with  rep  deg  of  freedom  from  FIT  etc 

REPSD 

RESW 

Param  with  replic.  sd  from  FIT,  ANOVA,  etc 

RES 

RESW 

Var  with  residuals  from  FIT,  ANOVA,  etc 

RESDF 

RESW 

Param  with  res  deg  of  freedom  from  FIT  etc 

RESSD 

RESW 

Param  with  res  sd  from  FIT,  ANOVA,  etc 

SAVE 

RESW 

Symbolic  name  for  DTPLT  SAVEd- command  file 

SUBSET 

RESW 

Qualifier  denoting  subset  of  interest 

♦TAGPLOT 

RESW 

Var  with  trace  identifier  for  last  multiple-trace  plot 

TO 

RESW 

Set  interval  of  values  within  a variable 

VERSUS 

RESW 

Used  with  PLOT,  etc  for  multi-trace  plot 

VERTICALLY 

RESW 

Rotate  contents  (but  not  frame)  of  plot 

WRT 

RESW 

•With  respect  to*;  used  in  LET  for  roots  etc 

♦XPLOT 

RESW 

Var  with  horizontal  axis  value  from  last  plot 

♦X2PLOT 

RESW 

Var  with  2nd  hori2X>ntal  axis  value  from  last  3-D  plot 

♦YPLOT 

RESW 

Var  with  vertical  axis  value  from  last  plot 

0 

RESW 

Set  math/Greek  char  in  TEXT,  LABEL,  etc. 

RESW 

Terminator  character  for  a command 

< 

RESW 

•Less  than* 

<= 

RESW 

•Less  than  or  equal  to* 

<> 

RESW 

•Not  equal  to* 

= 

RESW 

•Equal";  used  in  FIT,  PRE-FIT,  FOR,  etc 

> 

RESW 

•Greater  than* 

>= 

RESW 

■Greater  than  or  equal  to* 

• • • 

RESW 

Continue  command  onto  next  line. 

♦Added  after  Jan.  1989.  Available  in  all  versions  89.1  and  higher. 


237 


Fong,  Bernstein  & Filliben  (1992)  on  'PDA;  A PC-based  Expert  System  for  Analysis  of  DOE  Nuclear  Energy  Performance  indicator  Data 


AUTOCORRELATION  SC-LE  Compute  sample  autocorrelation 

AUTOCOVARIANCE  SC-LE  Compute  sample  autocovariance 


BETA  RANDOM  NUMBERS 
BINOMIAL  RANDOM  NllffiERS 
BIVEIGHT 


SC-LE  Generate  beta  random  num. 

SC-LE  Generate  binomial  random  num. 

SC-LE  Compute  biweight  transform,  for  robust  fitti 


CAUCHY  RANDOM  NUMBERS 

CHI -SQUARED  RANDOM  NUMBERS 

CODE 

CODE... 

C0DE2 

C0DE4 

CODES 

COMPLEX  ADDITION 
COMPLEX  CONJUGATE 
COMPLEX  DIVISION 
COMPLEX  EXPON’ENTIATION 
COMPLEX  MULTIPLICATION 
COMPLEX  ROOTS 
COMPLEX  SQUARE  ROOT 
COMPLEX  SUBTRACTION 
CONVOLUTION 
CORRELATION 
COVARIANCE 
CUMULATIVE  INTEGRAL 
CUMULATIVE  PRODUCT 
CUMULATIVE  SUM 


SC-LE  Generate  Cauchy  random  num. 

SC-LE  Generate  chi -squared  random  num. 

SC-LE  Code  the  elements  in  a variable 

SC-LE  Carry  out  binary,  quartile,...  coding 

SC-LE  Carry  out  binary  coding 

SC-LE  Carry  out  quartile  coding 

SC-LE  Carry  out  octile  coding 

SC-LE  Carry  out  complex  addition 

SC-LE  Carry  out  complex  conjugate 

SC-LE  Carry  out  complex  division 

SC-LE  Carry  out  complex  exponentiation 

SC-LE  Carry  out  complex  multiplication 

SC-LE  Compute  complex  roots 

SC-LE  Carry  out  complex  square  root 

SC-LE  Carry  out  complex  subtraction 

SC-LE  Compute  convolution  of  elts  in  2 var 

SC-LE  Compute  sample  correlation 

SC-LE  Compute  sample  covariance 

SC-LE  Compute  cun.  integrals  of  elts  in  a var 

SC-LE  Compute  cum.  products  of  elts  in  a var 

SC-LE  Compute  cum.  sums  of  elts  in  a var 


DATA 

...  DECILE 
DERIVATIVE 
DISTINCT 

DOUBLE  EXPO  RANDOM  NUMBER 


SC-LE  Generate  a set  of  data  values 

SC-LE  Compute  decile 

SC-LE  Compute  derivative  of  a function 

SC-LE  Extract  distinct  elements  from  a var 

SC-LE  Generate  double  exponential  random  num. 


EXPONENTIAL  RA.ND0M  NUlfflERS  SC-LE  Generate  exponential  random  niim. 

EXTR  VALUE  1 RANDOM  NUMBERS  SC-LE  Generate  extreme  value  type  1 ran  nim 
EXTR  value  2 RANDOM  NUMBERS  SC-LE  Generate  extreme  value  type  2 ran  num 


F RANDOM  NUMBERS 

SC-LE 

FFT 

SC-LE 

FIBONNACCI  NUMBERS 

SC-LE 

FOURIER  TRA.NSFORM 

SC-LE 

FOURTH  CENTR  MOME 

SC-LE 

FRACTAL  (future) 

SC-LE 

Generate  F random  num. 

Compute  fast  Fourier  transform 
Generate  Fibonnacci  numbers 
Compute  Fourier  transform 
Compute  sample  4th  central  moment 
Compute  values  of  fractal  curve 
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FREQUENCY 

SC-LE 

GAm  RANDOM  NUMBERS 

SC-LE 

GEOMETRIC  RANDOM  NUMBERS 

SC-LE 

HALFNORMAL  RANDOM  NUMBERS 

SC-LE 

INTEGRAL 

SC-LE 

INTEGRAL 

SC-LE 

INTERPOLATION 

SC-LE 

INVERSE  FFT 

SC-LE 

INVERSE  FOURIER  TRANSFORM 

SC-LE 

KURTOSIS 

SC-LE 

LOGICAL  AND 

SC-LE 

LOGICAL  IFF 

SC-LE 

LOGICAL  IFTHEN 

SC-LE 

LOGICAL  NAND 

SC-LE 

LOGICAL  NOR 

SC-LE 

LOGICAL  NOT 

SC-LE 

LOGICAL  OR 

SC-LE 

LOGICAL  XOR 

SC-LE 

LOGISTIC  RANDOM  NUMBERS 

SC-LE 

LOGNORMAL  RANDOM  NUMBERS 

SC-LE 

LOWER  HINGE 

SC-LE 

LOWER  QUARTILE 

SC-LE 

MATRIX  ADDITION 

SC-LE 

MATRIX  COFACTOR 

SC-LE 

MATRIX  DEFINITION 

SC-LE 

MATRIX  DETERMINANT 

SC-LE 

MATRIX  EIGENVALUES 

SC-LE 

MATRH  EIGENVECTORS 

SC-LE 

MATRIX  EUCLIDEAN  NORM 

SC-LE 

MATRIX  INVERSE 

SC-LE 

MATRIX  MINOR 

SC-LE 

MATRK  MULTIPLICATION 

SC-LE 

MATRIX  NUMBER  OF  COLUMNS 

SC-LE 

MATRH  NUMBER  OF  ROWS 

SC-LE 

MATRH  SIMPLEX  SOLUTION 

SC-LE 

MATRIX  SOLUTION 

SC-LE 

MATRK  SPECTRAL  NORM 

SC-LE 

MATRK  SPECTRAL  RADIUS 

SC-LE 

MATRK  SUBMATRK 

SC-LE 

MATRK  SUBTRACTION 

SC-LE 

MATRK  TRACE 

SC-LE 

MATRK  TRANSPOSE 

SC-LE 

MAXIMUM 

SC-LE 

MEAN 

SC-LE 

MEDIAN 

SC-LE 

MIDMEAN 

SC-LE 

Compute  frequencies  of  distinct  values 

Generate  gamma  random  num. 

Generate  geometric  random  num. 

Generate  halfnormal  random  num. 

Compute  definite  integral  of  a function 
Compute  integral  of  elements  in  a var 
Compute  (cubic  spline)  interpolated  values 
Compute  inverse  fast  Fourier  transform 
Compute  inverse  Fourier  transform 

Compute  sample  kurt  (stand  4th  cent  mom) 

Carry  out  logical  and 
Carry  out  logical  iff 
Carry  out  logical  ifthen 
Carry  out  logical  nand 
Carry  out  logical  nor 
Carry  out  logical  not 
Carry  out  logical  or 
Carry  out  logical  xor 
Generate  logistic  random  num. 

Generate  lognormal  random  num. 

Compute  sample  lower  hinge 
Compute  sample  lower  quartile 

Carry  out  matrix  addition 
Compute  matrix  cofactor 
Set  matrix  definition 
Compute  matrix  determinant 
Compute  matrix  eigenvalues 
Compute  matrix  eigenvectors 
Compute  matrix  Euclidean  norm 
Compute  matrix  inverse 
Compute  matrix  minor 
Carry  out  matrix  multiplication 
Compute  matrix  number  of  coliunns 
Compute  matrix  number  of  rows 
Compute  matrix  simplex  solution 
Compute  matrix  solution 
Compute  matrix  spectral  norm 
Compute  matrix  spectral  radius 
Define  matrix  submatrix 
Carry  out  matrix  subtraction 
Compute  matrix  trace 
Compute  matrix  transpose 
Compute  sample  maximum 
Compute  sample  mean 
Compute  sample  median 
Compute  sample  midmean 
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MIDRANGE  SC-LE  Coopute  saaple  midrajige 

MIMIMUk  SC-LE  Compute  sample  minimum 


NEGATIVE  BIND  RANDOM  NUMBERSSC-LE 
NORMAL  ORDER  STAT  MEDIANS  SC-LE 
NORMAL  RANDOM  NUMBERS  SC-LE 
♦NUMBER  SC-LE 


Generate  negative  binomial  random  num. 
Generate  normal  order  statistic  medians 
Generate  normal  N(0,1)  random  num. 
Compute  number  of  observations  in  a var 


PARETO  RANDOM  NTJMBERS  SC-LE 
PATTERN  SC-LE 
POISSON  RANDOM  NUMBERS  SC-LE 
POLYNOMIAL  ADDITION  SC-LE 
POLYNOMIAL  DIVISION  SC-LE 
POLYNOMIAL  EVALUATION  SC-LE 
POLYNOMIAL  MULTIPLICATION  SC-LE 
POLYNOMIAL  SQUARE  SC-LE 
POLYNOMIAL  SUBTRACTION  SC-LE 
PRIME  NUMBERS  SC-LE 
PRINCIPLE  COMPONENTS  SC-LE 
PRIN  COMP  EIGENVECTORS  SC-LE 
PRIN  COMP  EIGENVALUES  SC-LE 
. . . PRIN  COMP  SC-LE 
. . . PRIN  COMP  EIGENVEC  SC-LE 
. . . PRIN  COMP  EIGENTAL  SC-LE 
PRODUCT  SC-LE 


Generate  Pareto  random  num. 

Generate  a patterned  seq  within  a var 
Generate  Poisson  random  num. 

Carry  out  polynomial  addition 
Carry  out  polynomial  division 
Carry  out  polynomial  evaluation 
Carry  out  polynomial  multiplication 
Carry  out  polynomial  square 
Carry  out  polynomial  subtraction 
Generate  prime  numbers 
Gen  matrix  of  prin.  comp. 

Gen  matrix  of  prin.  comp,  eigenvectors 
Gen  matrix  of  prin.  comp,  eigenvalues 
Gen  a specific  prin.  comp. 

Gen  a specific  prin.  comp,  eigenvector 
Gen  a specific  prin.  comp,  eigenvalue 
Compute  product  of  elements  in  a var 


RANGE 

RANK 

RANK  CORRELATION 
RANK  COVARIANCE 
RELATIVE  STANDARD 
ROOTS 

RUNGE-KUTTA 


SC-LE 
SC-LE 
SC-LE 
SC-LE 
DEVIATION  SC-LE 
SC-LE 
SC-LE 


Compute  sample  range 

Rank  the  elements  in  a variable 

Compute  sample  rank  correlation 

Compute  sample  rank  covariance 

Compute  sample  relative  stand  dev 

Compute  roots  of  a function 

Compute  Runge-Kutta  diff.  eq.  solution 


SEMI-CIRC  RANDOM  NUMBERS 
SEQUENCE 

SEQUENTIAL  DIFFERENCE 

SET  CARDINALITY 

SET  CARTESIAN  PRODUCT 

SET  COMPLEMENT 

SET  DISTINCT 

SET  INTERSECTION 

SET  UNION 

SIZE 

SKEWNESS 

SORT 

SORTC 

STANDARD  DEVI  OF  THE  MEAN 
STANDARD  DEVIATION 
SUM 


SC-LE  Generate  semi-circular  random  num. 

SC-LE  Generate  a sequence  within  a var 

SC-LE  Compute  seq.  differences  of  elts  in  a var 

SC-LE  Compute  set  cardinality 

SC-LE  Carry  out  set  cartesian  product 

SC-LE  Carry  out  set  complement 

SC-LE  Extract  distinct  elements  of  a set 

SC-LE  Carry  out  set  intersection 

SC-LE  Carry  out  set  union 

SC-LE  Compute  sample  size  (number  of  observ) 
SC-LE  Compute  s2UDple  skew  (stand  3rd  cent  mom) 
SC-LE  Sort  the  elements  in  a variable 
SC-LE  Sort  elem  in  1 var  k carry  another  var 
SC-LE  Compute  standard  deviation  of  the  mean 
SC-LE  Compute  sample  standard  deviation 
SC-LE  Compute  sum  of  elements  in  a variable 


T RANDOM  NUMBERS  SC-LE  Generate  t random  num. 

THIRD  CENTRAL  MOME  SC-LE  Compute  sample  third  central  moment 


♦Added  after  Jan.  1989.  Available  in  all  versions  89.1  and  higher. 
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TRIANGULAR  RANDOM  NUMBERS  SC-LE 
TRICUBE  SC-LE 
TRIWEIGHT  SC-LE 
TUKEY  LAMBDA  RANDOM  NUMBERS  SC-LE 


Generate  triangular  random  num. 

Compute  tricube  transform,  for  robust  fittin 
Compute  tricube  transform,  for  robust  fittin 
Generate  Tukey  lambda  random  num. 


UNIFORM  ORDER  STAT  MEDIANS  SC-LE 
UNIFORM  RANDOM  NUMBERS  SC-LE 
UPPER  HINGE  SC-LE 
UPPER  QUARTILE  SC-LE 


Generate  uniform  order  statistic  medians 
Generate  uniform  (0,1)  random  num. 
Compute  sample  upper  hinge 
Compute  sample  upper  quartile 


VARIANCE 
VECTOR  ADDITION 
VECTOR  ANGLE 
VECTOR  DISTANCE 
VECTOR  DOT  PRODUCT 
VECTOR  LENGTH 
VECTOR  SUBTRACTION 


SC-LE  Compute  sample  variance 
SC-LE  Carry  out  vector  addition 
SC-LE  Compute  vector  angle 
SC-LE  Compute  vector  distance 
SC-LE  Carry  out  vector  dot  product 
SC-LE  Compute  vector  length 
SC-LE  Carry  out  vector  subtraction 


WEIBULL  ADJUSTED  RANKS 
WEIBULL  RANDOM  NUMBERS 
WEIGHTED  MEAN 
WEIGHTED  RANGE 
WEIGHTED  SD 


SC-LE  Generate  adj . ranks  for  Weibull  analysis 
SC-LE  Generate  Weibull  random  numbers 
SC-LE  Compute  sample  weighted  mean 
SC-LE  Compute  sample  weighted  range 
SC-LE  Compute  sample  weighted  st.  dev. 


r 


I Subcommands  Under*  SET  Command 


FOURIER  EXPONENT 

SC-SE 

HELP  LINES 

SC-SE 

10 

SC-SE 

IPR 

SC-SE 

IRD 

SC-SE 

LIST  LINES 

SC-SE 

PEEPLOT 

SC-SE 

READ  FORMAT 

SC-SE 

SUBSTITUTION  CHARACTER 

SC-SE 

WRITE  DECIMALS 

SC-SE 

Set  Fourier  exponent 

Set  number  of  lines/screen  for  HELP 

Set  10  source  for  menu  macros 

Set  log  unit  num  for  printed  output 

Set  log  unit  num  for  input 

Change  number  of  commands  for  LISTing 

Define  gr  dev  for  PREPLOT/POSTPLOT  str 

Set  format  for  (fast)  READ 

Define  alternate  substitution  char  (for 

Set  num.  decimals  for  WRITE  output 


\) 
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r 


Library  Functions 


ABS  (X) 

FUNC 

Compute 

absolute  value 

ARCCOS(X) 

FUNC 

Compute 

arccosine 

ARCCOSH(X) 

FUNC 

Compute 

hyperbolic  arccosine 

AJICCOT(X) 

FUNC 

Compute 

arccotangent 

ARCCOTH(X) 

FUNC 

Compute 

hyperbolic  arccotangent 

ARCCSC(X) 

FUNC 

Compute 

arccosecant 

ARCCSCH(X) 

FUNC 

Compute 

hyperbolic  arccosecant 

ARCSEC(X) 

FUNC 

Compute 

arcsecant 

ARCSECH(X) 

FUNC 

Compute 

hyperbolic  arcsecant 

AJICSIN(X) 

FUNC 

Compute 

arcsine 

ARCSINE (X) 

FUNC 

Compute 

hyperbolic  arcsine 

ARCTAN(X) 

FUNC 

Compute 

arctangent 

ARCTANH(X) 

FUNC 

Compute 

hyperbolic  arctangent 

BESSO(X) 

FUNC 

Compute 

Bessel  func  1st  kind  k order  0 

BESSl (X) 

FUNC 

Compute 

Bessel  func  1st  kind  t order  1 

CHEBO(X) 

FUNC 

Compute 

Chebychev  poly  1st  kind  t ord  0 

CHEBl(X) 

FUNC 

Compute 

Chebychev  poly  1st  kind  k ord  1 

CHEB2(X) 

FUNC 

Compute 

Chebychev  poly  1st  kind  t ord  2 

CHEB3(X) 

FUNC 

Compute 

Chebychev  poly  1st  kind  k ord  3 

CBEB4(X) 

FUNC 

Compute 

Chebychev  poly  1st  kind  k ord  4 

CHEBS(X) 

FUNC 

Compute 

Chebychev  poly  1st  kind  t ord  5 

CHEB6(X) 

FUNC 

Compute 

Chebychev  poly  1st  kind  k ord  6 

CHEB7(X) 

FUNC 

Compute 

Chebychev  poly  1st  kind  k ord  7 

CHEB8(X) 

FUNC 

Compute 

Chebychev  poly  1st  kind  k ord  8 

CHEB9(X) 

FUNC 

Compute 

Chebychev  poly  1st  kind  k ord  9 

CHZBIO(X) 

FUNC 

Compute 

Chebychev  poly  1st  kind  k ord  10 

CHSCDF(X,NU) 

FUNC 

Compute 

chi-squared  cumulative  dist  func 

CHSPDF(X,NU) 

FUNC 

Compute 

chi-squared  prob  density  f\inc 

CHSPPF(P,NU) 

FUNC 

Compute 

chi-squared  percent  point  func 

COS(X) 

FUNC 

Compute 

cosine 

COSH(X) 

FUNC 

Compute 

hyperbolic  cosine 

C0T(X) 

FUNC 

Compute 

cotangent 

COTH(X) 

FUNC 

Compute 

hyperbolic  cotangent 

CSC(X) 

FUNC 

Compute 

cosecant 

CSCH(X) 

FUNC 

Compute 

hyperbolic  cosecant 

DECOCT (X) 

FUNC 

Compute 

decimal  to  octal  conversion 

DIM  (X,  YU) 

FUNC 

Compute 

positive  difference — x-min(x,y) 

ERF(X) 

FUNC 

Compute 

error  function 

ERFC(X) 

FUNC 

Compute 

complementary  error  function 

EXP(X) 

FUNC 

Compute 

exponential  func 
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FCDF(X,NU1,NU2) 

FUNC 

Compute  F cumulative  dist  func 

FPDF(X,NU1,NU2) 

FUNC 

Compute  F probability  density  func 

FPPF(P,NU1,NU2) 

FUNC 

Compute  F percent  point  function 

FRACT(X) 

FUNC 

Compute  fractional  portion 

GAm(X) 

FUNC 

Compute  gamma  function 

IND(X,TAG) 

FUNC 

Compute  (0-1)  indicator  function 

INT(X) 

FUNC 

Compute  integer  portion 

LN(X) 

FUNC 

Compute  logarithm  (natural) 

LOG(X) 

FUNC 

Compute  logarithm  (natural) 

LOGIO(X) 

FUNC 

Compute  logarithm  (base  10) 

L0G2(X) 

FUNC 

Compute  logarithm  (base  2) 

LOGGAm(X) 

FUNC 

Compute  log  (to  the  base  e)  gamma  func 

LSD(X) 

FUNC 

Compute  least  significant  digit 

MAX(X,Y) 

FUNC 

Compute  maximum 

MIN(X,Y) 

FUNC 

Compute  minimum 

M0D(X,Y) 

FUNC 

Compute  modulo 

NORCDF(X) 

FUNC 

Compute  normal  N(0,1)  cumulative  dist  func 

NORPDF(X) 

FUNC 

Compute  normal  N(0,1)  prob  density  func 

NORPPF(P) 

FUNC 

Compute  normal  N(0,1)  percent  point  func 

OCTDEC(X) 

FUNC 

Compute  octal  to  decimal  conversion 

ROUND (X,N) 

FUNC 

Compute  rounded  value  (to  N dec.  places) 

SEC(X) 

FUNC 

Compute  secant 

SECH(X) 

FUNC 

Compute  hyperbolic  secant 

SIGN(X) 

FUNC 

Compute  sign 

SIN(X) 

FUNC 

Compute  sine 

SINH(X) 

FUNC 

Compute  hyperbolic  sine 

SQRT(X) 

FUNC 

Compute  square  root 

TAN(X) 

FUNC 

Compute  tangent 

TANH(X) 

FUNC 

Compute  hyperbolic  tangent 

TCDF(X.NU) 

FUNC 

Compute  t cumulative  dist  func 

TPDF(X,NU) 

FUNC 

Compute  t probability  density  func 

TPPF(P,NU) 

FUNC 

Compute  t percent  point  function 

WEICDF(X,GAm) 

FUNC 

Compute  Weibull  cum  distribution  func 

WEIPDF(X,GAm) 

FUNC 

Compute  Weibull  prob  density  func 

tFIPPFCP, GAMMA) 

FUNC 

Compute  Weibull  percent  point  function 
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Characters  & Symbols 


ALPHO 

CB/SY  Write/draw  Greek  alpha 

APPRO 

CB/SY  Write/draw  approxinatly  equal  to 

ARRDO 

CB/SY  Write/dran  arrow  pointing  down 

ARRLO 

CB/SY  Write/draw  arrow  pointing  left 

ARRRO 

CB/SY  Write/draw  arrow  pointing  right 

ARRUO 

CB/SY  Write/draw  arrow  pointing  up 

BAR() 

CB/SY  Write/draw  bar 

BARHO 

CB/SY  Write/draw  horizontal  bar 

BARVO 

CB/SY  Write/draw  vertical  bar 

BASIC) 

CB/SY  Write/draw  backslash 

BETAO 

CB/SY  Write/draw  Greek  beta 

BRADO 

CB/SY  Write/draw  larger  radical 

BREVO 

CB/SY  Write/draw  breve 

BS()  <make  work> 

CB/SY  Move  1 backspace 

CARAO 

CB/SY  Write/draw  carot 

CHIO 

CB/SY  Write/draw  Greek  chi 

CINTO 

CB/SY  Write/draw  circular  integral 

CIRCO 

CB/SY  Write/draw  circle 

CUBEQ 

CB/SY  Write/draw  cube 

DAGGO 

CB/SY  Write/draw  dagger 

DARRO 

CB/SY  Write/draw  down  arrow 

DDAGO 

CB/SY  Write/draw  double  dagger 

DEL() 

CB/SY  Write/draw  vector  product 

DELTO 

CB/SY  Write/draw  Greek  delta 

DIAIIO 

CB/SY  Write/draw  diamond 

DIVIO 

CB/SY  Write/draw  division 

DOTPO 

CB/SY  Write/draw  dot  product 

DVBAO 

CB/SY  Vrite/draw  double  vertical  bar 

ELEMO 

CB/SY  Write/draw  is  an  element  of 

EPSIO 

CB/SY  Write/draw  Greek  epsilon 

EQUIO 

CB/SY  Write/draw  equivalence 

ETAO 

CB/SY  Write/draw  Greek  eta 

GAMMO 

CB/SY  Write/draw  Greek  gamma 

GTO 

CB/SY  Write/draw  greater  than 

GTEQO 

CB/SY  Write/draw  greater  than  or  equal  to 

EASPO 

CB/SY  Move  a half -space 

EATO 

CBfeSY  Vrite/draw  hat  (=  high  carat) 

EBARO 

CB/SY  Write/draw  horizontal  bar 
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lASPO 

CH/SY  Write/dra-w  inverted  nasp 

INFIO 

CH/SY  Write/draw  infinity 

INTEO 

CH/SY  Write/draw  integral 

INTRO 

CH/SY  Write/draw  intersection 

lOTAO 

CH/SY  Write/draw  Greek  iota 

KAPPO 

CH/SY  Write/draw  Greek  kappa 

LACCO 

CH/SY  Write/draw  left  accent 

LAMBO 

CH/SY  Write/draw  Greek  lambda 

LAPOO 

CH/SY  Write/dran  left  apostrophe 

LARRO 

CH/SY  Write/draw  left  arrow 

LBRAO 

CH/SY  Write/draw  left  bracket 

LCO 

CH/SY  Shift  to  lower  case 

LCBRO 

CH/SY  Write/draw  left  curly  bracket 

LELBO 

CH/SY  Write/draw  left  elbow 

LEBAO 

CH/SY  Write/draw  long  horirontal  bar 

LQUOO 

CH/SY  Write/draw  left  quote 

LRADO 

CH/SY  Write/draw  large  radiacal 

LT() 

CH/SY  Write/draw  less  than 

LTEQO 

CH/SY  Write/draw  less  than  or  equal  to 

LVBAO 

CH/SY  Write/draw  long  vertical  bar 

MU() 

CH/SY  Write/draw  Greek  mu 

NASPO 

CH/SY  Write/draw  nasp 

N0T=O 

CH/SY  Write/draw  not  equal 

NU() 

CH/SY  Write/draw  Greek  nu 

OMEGO 

CH/SY  Write/draw  Greek  omega 

OklCO 

CH/SY  Write/draw  Greek  omicon 

PARAO 

CH/SY  Write/draw  paragraph 

PARTO 

CH/SY  Write/draw  partial  derivative 

PHI() 

CH/SY  Write/draw  Greek  phi 

PI() 

CH/SY  Write/draw  Greek  pi 

PRIMO 

CH/SY  Write/draw  prime 

PRODO 

CH/SY  Write/draw  product 

PSIO 

CH/SY  Write/draw  Greek  psi 

PYRAO 

CH/SY  Write/draw  pyramid 

RACCO 

CH/SY  Write/draw  right  accent 

RADIO 

CH/SY  Write/draw  radical 

RAPOO 

CH/SY  Write/draw  right  apostrophe 

RARRO 

CH/SY  Write/draw  right  arrow 

RBRAO 

CH/SY  Write/draw  right  bracket 

RCBRO 

CH/SY  Write/draw  right  curly  bracket 

RELBO 

CH/SY  Write/draw  right  elbow 

RHOO 

CH/SY  Write/draw  Greek  rho 

RQUO  0 

CH/SY  Write/draw  right  quote 

SIGkO 

CH/SY  Write/draw  Greek  sigma 
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SQUAO 

STARO 

SUB() 

SUBSO 

SUkWO 

SUP() 

SUPEO 

TAU() 

THETO 

THEXO 

TEFOO 

TILDO 

TIMEO 

TRIAO 

TRIIO 

UARRO 

UC() 

UM0() 

UNSBO 

UNSPO 

UPSIO 

VALUO 

VARIO 

VBARO 

XI 0 

ZETA() 

-0 

-0 
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CH/SY  Write/draw  square 
CH/SY  Write/draw  star 
CH/SY  Shift  to  subscript 
CH/SY  Write/draw  subset 
CH/SY  Write/draw  summation 
CH/SY  Shift  to  superscript 
CH/SY  Write/draw  superset 

CH/SY  Write/draw  Greek  tau 
CH/SY  Write/draw  Greek  theta 
CH/SY  Write/draw  there  exists 
CH/SY  Write/draw  therefore 
CH/SY  Write/draw  tilda 
CH/SY  Write/draw  times  sign 
CH/SY  Write/draw  triangle 
CH/SY  Write/draw  inverted  triangle 

CH/SY  Write/draw  up  arrow 
CH/SY  Shift  to  upper  case 
CH/SY  Write/draw  union 
CH/SY  Shift  to  un-subscript 
CH/SY  Shift  to  un-superscript 
CH/SY  Write/draw  Greek  upsilon 

CH/SY  Write  actual  value  of  succeeding  paraa 
CH/SY  Write/draw  varies 
CH/SY  Write/draw  vertical  bar 

CH/SY  Write/draw  Greek  xi 

CH/SY  Write/draw  Greek  zeta 

CH/SY  Write/draw  or  - 
CH/SY  Write/draw  - or  ♦ 

CH/SY  Write  actual  value  of  succeed,  param  or  str 
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r 


Argumen'ts  for  CHARACTERS  Comin. 

I 


ARROWD 

AR-CH 

Set 

ARROWU 

AR-CH 

Set 

BLANK 

AR-CH 

Set 

BOX  PLOT 

AR-CH 

Set 

BUILT-IN  CHAR/SYWBOL  (ANY) 

AR-CH 

All 

CIRaE 

AR-CH 

Set 

CONTROL  CHART 

AR-CH 

Set 

CUBE 

AR-CH 

Set 

DIAMOND 

AR-CH 

Set 

plot  character  to  arron  doim 
plot  character  to  arrov  up 

plot  character  to  blank 

all  plot  characters  for  BOX  PLOT 

b-i  char/sym  may  be  used  for  plot  char 

plot  character  to  circle 

all  plot  characters  for  CONTROL  CHART 

plot  character  to  cube 

plot  character  to  diamond 


I PLOT 


AR-CH  Set  all  plot  characters  for  I PLOT 


KEYBOARD  CHARACTER  (ANY) 


AR-CH  All  keybd  char  may 


be  used  for  plot  char 


PYRAICED 


AR-CH  Set  plot  character 


to  pyramid 


REVTRI 

AR-CH 

Set 

SQUARE 

AR-CH 

Set 

STAR 

AR-CH 

Set 

TRIANGLE 

AR-CH 

Set 

TUFTE  BOX  PLOT 

AR-CH 

Set 

VB 

AR-CH 

Set 

plot  character  to  reverse  triangle 

plot  character  to  square 
plot  character  to  star 

plot  character  to  triangle 

all  plot  characters  for  TUFTE  BOX  PLOT 

plot  character  to  vertical  bar 
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BLANK 

AR-LI 

Set 

BOX  PLOT 

AR-LI 

Set 

CONTROL  CHART 

AR-LI 

Set 

DASHl 

AR-LI 

Set 

DASH2 

AR-LI 

Set 

DASH3 

AR-LI 

Set 

DASH4 

AR-LI 

Set 

DASHED 

AR-LI 

Set 

DOTTED 

AR-LI 

Set 

I PLOT 

AR-LI 

Set 

SOLID 

AR-LI 

Set 

TUFTE  BOX  PLOT 

AR-LI 

Set 

line  type  to  blank  (=  none) 

all  plot  lines  for  BOX  PLOT 

all  plot  lines  for  CONTROL  CMT 

line  type  to  dashed  type  1 

line  type  to  dashed  type  2 

line  type  to  dashed  type  3 

line  type  to  dashed  type  4 

line  type  to  dashed 

line  type  to  dotted 

all  plot  lines  for  I PLOT 

line  type  to  solid 

all  plot  lines  for  TUHE  BOX  PLOT 


Arguments  for  FONT  Command 


COMPLEX 
COMPLEX  SCRIPT 
DUPLEX 
SIMPLEX 
SIMPLEX  SCRIPT 
TEKTRONH 
TRIPLEX 
TRIPLEX  ITALIC 


AR-FO  Set  font  to  complex 

AR-FO  Set  font  to  complex  script 

AR-FO  Set  font  to  duplex 

AR-FO  Set  font  to  simplex 

AR-FO  Set  font  to  simplex  script 

AR-FO  Set  font  to  Tektronix 
AR-FO  Set  font  to  triplex 

AR-FO  Set  font  to  triplex  italic 
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Appendix  D 


Prolog  and  DATAPLOT 
Service  Contacts 
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Appendix  D Section  1 - Prolog  Service  Contacts 

The  expert  system  PDA  (v.  92.2)  described  in  this  document  was  coded  in  LPA 
PROLOG  Professional  (version  1.4,  Standard  Lisp-like  syntax),  which  is  a copyrighted  product 
of  the  Logical  Programming  Associates,  London,  U.K.,  and  was  marketed  in  the  United  States 
under  the  name  of  micro-PROLOG.  A complete  listing  of  the  expert  system  PDA  code  is  given 
in  Appendix  B.  In  the  introductory  chapter  of  the  micro-Prolog  version  1.4  Manual  [Ref.  25], 
McCabe  et  al  wrote 

"LPA  PROLOG  Professional  fi.e. , micro-PROLOG)  is  both  powerful  and flexible, 
with  an  optimising  compiler  and  matching  interpreter.  It  supports  programming  in  both 
its  Standard,  Lisp-like  syntax  and  in  the  Edinburgh  syntax  used  in  many  mainframe 
systems. 


"Standard  syntax  is  ideal  for  writing  programs  that  manipulate  themselves  or 
other  programs  as  data  because  it  treats  programs  and  data  alike  as  a single  data  type  - 
the  list.  Furthermore,  its  meta-level  power  is  unequalled  because  programs  can  be 
written  with  PROLOG  variables  in  place  of  predicate  names,  argument  lists,  individual 
goals  or  even  an  entire  clause  body.  Provided  the  variable  has  been  instantiated  by  the 
time  of  the  call,  the  program  will  run  correctly. 

"Edinburgh  syntax  is  far  richer,  but  at  the  same  time  more  restrictive,  because 
terms  and  lists  are  of  different  types,  and  goals,  argument  lists  and  bodies  cannot  be 
represented  in  source  code  by  PROLOG  variables. " 

Between  March  1987  and  June  1991,  the  version  number  of  micro-PROLOG  rose  from  1.4  to 
3.0.  According  to  reliable  information,  a major  change  occurred  at  around  version  2.0  when 
the  language  dropped  its  support  for  Standard  syntax  and  went  solely  for  the  Edinburgh  syntax. 
The  U.S.  distributor  of  the  Prolog  products  was  also  changed  and  the  current  one  is: 


Qunitus  Corporation 
2100  Geng  Road 
Palo  Alto,  CA  94303 


Tel.  (415)  813-3800. 

(800)  542-1283. 
Fax:  (415)  494-7608. 


Sales  Contact:  Carrie  Biondi  DuBois  (415-813-3828). 

Technical  Support:  Ken  Crawbuck  (415-813-3811). 


The  Prolog  products  are  available  across  PC  DOS,  Macintosh,  UNIX,  VAX/VMS,  IBS/MVS, 
and  IBM/VM  platforms.  The  basic  DOS  Prolog  Compiler  (version  3.0)  adheres  to  the 
Edinburgh  syntax  and  lists  for  $595.  The  old  version  1.4,  which  supports  both  the  Standard  and 
the  Edinburgh  syntax,  is  neither  available  for  sale  nor  eligible  for  technical  support. 
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Appendix  D Section  2 - DATAPLOT  Contact 

DATAPLOT  is  a R&D  statistical  analysis  software  program  prototype  developed  by  the 
National  Institute  of  Standards  and  Technology  (NIST).  The  program  is  Fortran  77-based  and 
is  portable  on  all  major  mainframes,  minis,  workstations,  and  386SX/386/486  personal 
computers  (PCs). 

To  obtain  additional  information  on  DATAPLOT,  write  to 

Statistical  Engineering  Division 

National  Institute  of  Standards  & Technology 

Room  A337,  Admin.  Bldg. 

Gaithersburg,  MD  20899 
Tel.  301-975-2839 
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Index  of 

85  DATAPLOT  Commands  used  in  Tutorials  6.1  to  6.14 


108; 

246. 

MAJOR  ...TIC  NUMBER 

114 

231. 

104; 

236. 

MARGIN 

109 

228. 

114; 

237. 

MAX  or  MAXIMUM 

117 

239. 

MEAN 

104 

239. 

4-PLOT 

150; 

226. 

MINOR  ...TIC  NUMBER  .. 

114, 

231. 

ANOVA 

170; 

229. 

MOVE 

109, 

239. 

AUTOCORRELATION 

137; 

238. 

AUTOCORRELATION  PLOT 

137; 

223. 

NORPDF(X) 

173; 

243. 

AUTOMATIC 

•• 

150; 

236. 

NUMBER 

104; 

240. 

BAR 

104; 

230. 

PAUSE 

105 

235. 

BLANK 

113; 

248. 

PIE  CHART 

108 

224. 

BOX-COX  NORMALITY  PLOT 

168; 

223. 

PLOT 

114 

224. 

...PPCCPLOT 

156 

224. 

CAPTURE 

153; 

234. 

PRED 

121 

237. 

CHARACTER 

104; 

230. 

CHSPPF  (P,  NU)  .. 

173; 

242. 

PRE-ERASE 

109 

231. 

CIRCLE 

146; 

247. 

..  PROBABILITY  PLOT  .. 

173 

224. 

CLASS 

104; 

234. 

COLUMN  LIMITS 

108; 

233. 

READ 

104 

233. 

CORRELATION  . 

173; 

238. 

RESSD 

121 

237. 

CUMULATIVE  SUM 

113; 

238. 

ROW  LIMITS 

108 

233. 

DATA 

141; 

238. 

SEQUENCE 

108 

240. 

DEFINE 

104; 

234. 

SKIP 

108 

233. 

DEGREES 

108; 

234. 

SORT 

173 

240. 

DELETE 

117; 

234. 

SORTC 

113 

240. 

SPIKE 

125 

231. 

DEVICE 

104; 

232. 

STANDARD  deviation  . 

104 

240. 

DIMENSION 

104; 

234. 

STANDARD  DEVIATION  OF 

THE  MEAN 

141 

240. 

END  OF  CAPTURE 

153; 

234. 

SUBSET 

117 

237. 

END  OF  LOOP 

108; 

234. 

SUM 

113 

240. 

EXIT 

105; 

234. 

SUMMARY 

153 

229. 

FEEDBACK 

104; 

234. 

TEXT 

109 

228. 

...  FIT 

121; 

229. 

TIC 

104 

231. 

FOR 

108; 

236. 

TITLE 

104 

232. 

TPPF(P,  NU) 

121 

243 

...  HISTOGRAM  . 

105; 

224. 

HW 

108; 

227. 

UC() 

105 

246. 

UNIFORM  ORDER  ST  AT 

IF 

109; 

235. 

MEDIAN 

173 

241. 

JUSTIFICATION  .. 

108; 

VERTICAL  SPACEING 

109 

; 228. 

...LABEL 

104; 

231. 

WEIGHTED  MEAN 

146 

; 241. 

...LAG  PLOT 

133; 

224 

WEIPDF  (X,  GAMMA) 

173 

; 243. 

WEIPPF  (P.  GAMMA) 

173 

; 243. 

LC() 

104; 

245. 

WINDOW 

104 

; 232. 

LEGEND 

104; 

231. 

LET 

104; 

XPLOT 

108 

; 237. 

...LIMITS 

104; 

231. 

LINEAR  FIT 

121; 

229. 

YPLOT 

108 

; 237. 

LINES 

113; 

228. 

LOOP 

108; 

235. 

Note:  Bold  face  denotes  first 

occurrence. 

252 


4.  TITLE  AND  SUBTITLE 

PDA:  A PC-based  Expert  System  for  Analysis  of  DoE  Nuclear  En 
Performance  Indicator  Data 

ergy 

5.  AUTHOR(S) 

J.  T.  Fong,  B.  Bernstein,  and  J.  J.  Filllben 

6.  PERFORMING  ORGANIZATION  (IF  JOINT  OR  OTHER  THAN  NIST,  SEE  INSTRUCTIONS) 

U.S.  DEPARTMENT  OF  COMMERCE 

NATIONAL  INSTITUTE  OF  STANDARDS  AND  TECHNOLOGY 

GAITHERSBURG,  MD  20899 

7.  CONTRACT/GRANT  NUMBER 

0191NE-20413.0001 

8.  TYPE  OF  REPORT  AND  PERIOD  COVERED 

Final 

9.  SPONSORING  ORGANIZATION  NAME  AND  COMPLETE  ADDRESS  (STREET,  CITY,  STATE,  ZIP) 

NIST-1 14A  U.S.  DEPARTMENT  OF  COMMERCE 

(REV.  3-90)  NATIONAL  INSTITUTE  OF  STANDARDS  AND  TECHNOLOGY 

BIBLIOGRAPHIC  DATA  SHEET 


1. 

PUBUCATION  OR  REPORT  NUMBER 

NISTIR 

4907 

2. 

PERFORMING  ORGANIZATION  REPORT  NUMBER 

3. 

PUBUCATION  DATE 

AUGUST 

1992 

NIST 

Computing  & Applied  Mathematics  Laboratory 
Gaithersburg,  MD  20899 


U.S.  Department  of  Energy 

Office  of  Nuclear  Energy 

Office  of  Nuclear  Energy  Self-Assessment 

Washington,  DC  20585 


10.  SUPPLEMENTARY  NOTES 


11.  ABSTRACT  (A  200-WORD  OR  LESS  FACTUAL  SUMMARY  OF  MOST  SIGNIFICANT  INFORMATION.  IF  DOCUMENT  INCLUDES  A SIGNIFICANT  BIBUOGRAPHY  OR 
LITERATURE  SURVEY.  MENTION  IT  HERE.) 

A personal  computer  (PC) -based  expert  system  is  developed  as  a front  end  to  commercially- 
available  MS-DOS-based  software  and  a public-domain  statistical  package  named  DATAPLOT  (v92.2) 
Coded  in  micro-PROLOG  (v.1.4),  the  expert  system  PDA  is  designed  to  (1)  facilitate  the  analysi 
of  the  so-called  performance  indicator  data  by  the  technical  staff  of  the  Office  of  Nuclear 
Energy  (NE) , U.S.  Department  of  Energy  (DoE) ; (2)  enhance  the  analysis  and  database  management 
capability  of  an  engineer  or  scientist  through  a series  of  tutorial  exercises;  and  (3)  encour- 
age the  modification  of  the  Prolog  code  of  PDA  or  the  English-based  codes  of  the  DATAPLOT 
macros  by  users  interested  in  customizing  the  system  for  new  or  proprietary  applications.  To 
achieve  these  objectives,  the  system  includes  three  special  features:  (i)  A temporary  exit  to 
access  any  MS-DOS-based  packages  such  as  LOTUS  1-2-3,  etc.  (ii)  More  than  twenty  built-in 
DATAPLOT  macros  for  a user  to  obtain,  at  a single  key  stroke,  simple  plots  such  as  histograms, 
pie  charts,  Pareto  charts,  C-charts  (count  charts),  P-charts  (proportion  charts),  lag  plots, 
autocorrelation  plots,  box  plots,  scatter  plots,  etc.,  as  well  as  statistical  tests  to  identify 
data  distributions  such  as  normal,  lognormal,  uniform,  logistic,  exponential,  Cauchy,  Poisson, 
Gamma,  Beta,  Weibull,  extreme  value  types  I and  II,  and  binomial.  (iii)  A direct  access  to 
DATAPLOT  for  users  to  write  their  own  macros  to  conduct  a full-range  of  tests,  analysis,  and 
experimental  design.  The  minimum  requirements  of  the  PC  computing  environment  for  running  PDA 
are:  80386SX-16  CPU,  8/16-MHz,  2MB-RAM,  40MB-Hard  disk,  math-coprocessor,  1.44-MB  3.5"  or 
1.2-MB  5.25"  high  density  floppy  drive,  MS-DOS  3.3,  and  a properly  installed  version  of 
DATAPLOT  (v.  92.2). 


12.  KEY  WORDS  (6  TO  12  ENTRIES;  ALPHABETICAL  ORDER;  CAPITAUZE  ONLY  PROPER  NAMES;  AND  SEPARATE  KEY  WORDS  BY  SEMICOLONS) 

artificial  intelligence;  computational  mathematics;  data  analysis;  DATAPLOT;  engineering 
expert  system;  expert  system;  micro-PROLOG;  nuclear  energy;  PC-computing;  performance 
indicator;  statistical  engineering 


13.  AVAILABIUTY 

UNUMITED 

FOR  OFFICUU.  DISTRIBUTION.  DO  NOT  RELEASE  TO  NATIONAL  TECHNICAL  INFORMATION  SERVICE  (NTIS). 


X 


ORDER  FROM  SUPERINTENDENT  OF  DOCUMENTS,  U.S.  GOVERNMENT  PRINTING  OFFICE, 
WASHINGTON,  DC  20402. 

ORDER  FROM  NATIONAL  TECHNICAL  INFORMATION  SERVICE  (NTIS),  SPRINOnELD.VA  22161. 


14.  NUMBER  OF  PRINTED  PAGES 

265 


IS.  PRICE 


A12 


ELECTRONIC  FORM 


- • l33Ha  AT«1.0«««8C^«i;: 


■!  -.'jJ'Kt, 


0 


m.-^ 


■ ft;. : • ■ ' W m'k  ^ 

'A‘>.l  ±0  ^tvi’a-iMrA  5l)3  .ssja'JsX^  Jf-rsqr^‘ 


--  l^iC^rfi  *»-l^,iSt»»^-|»n«.;.-’' 


M'a<3e.v  jK: 


S^)^^.>=’2'.?S*’'Htay;i;' 


■M  "v^. 

.,>««>%■>  » :«wi>'*«yn*^i>-'^>««*i 


hfA'l^ui  r.iA'XxM^Si'  -,  /.;,  ii, 

V ' . - ' : : ■ .W  ^ ■ '■'■  ■ 


I". 

fx'i 


to  -'‘i 


.^"5^. ; ' 


, ,.  • -misXrjim  'i:^. 

iv;-  ..*ij;j^pjMyevi/ 


‘rl  • i A . I ' 


n^jyr  : ;.  e^BOSi 

,.  ^*KC  H : •’  ' ■ JJ 

• *1^'  will  nv^i_>«jj^'ii  ;r,fii'anrii^ 


■Al-.-. 


U,, 


4-j 

t-i',;  iVf 

.^4:  ?,“ 


K1».A5  ■ 

l'>T4?S*sv,!fc5^'''', 


mM 


-,  M- 


'.H*  -^n^l•v!/\:ri ■ Ijo:^ ''tf&tt-  *3  }^.L-  *i: 

f;J  ..A"^*..'!  c -TrSa  %y_<iA-:iiiq  £».  ! :=''v, 

-:jf  <*•'  ; ..  ;<  C,j  &«Rg  1 ^.$.b  4’/.^  t?fOJav:<i  ioXs  ,,-<i*iv’?') 

i.Vr-K.  r ,-.  -isik  {'X)  ii'S-nd) 


“ ■'  i' 


;'u'"  i;!/*'  '.  -32  -huco..  v,'.  j > !■5q^t'f^>^.;i^  ■:.rji  ^ 


■>.1 


•iS--- 

'K  >■  . { i iOj 

TH  Ij'.ioqO'vi'J'V 

£ iy/r.i* 

J * 

.1 

. J ji  , i;^:  J..J. 

c??-' 

1 

'■■•.ii,a.>ri-x. -'  .'-.i.' 

> 

■■  -ii 

.%  X.*,* 

.£  .;:i ' . iS  j i 

IV,V2(1  i 

^-i  = r n 

,.^  D.  J!v.'.7t-4  '-J.  i. 

u : s ►: 

ri  - - V"^'' 

- 

. ..  1 ■■  : 

oi-^  ioo  T'sC-'j*  ’JixiijS  *' 

! ■' 

r 

■ .■  ■ =(?(*'  et>.i  ■ 

T-  '-y  rrHir‘ 

yq  a H 

5 

4 

- ' '■ .s^ 

1. 

...:  T iE:f;^c.4T=  ^f?'b.vj.r.'.jff^-  ,f^aav-e  4','lj  „ 5eS^JtJ,St‘(9|’^: 

"■  'is.)  ■ =^».:  .t  --^Li-  i, 

iJ>M■>.'S.?C;>;V-'K.^ ‘Y.if^fii.t^  £ ■33  ■ ■Bt'' 4 O^i 

, ;.  ir:  j4,t-  ■5.sys>.‘>).  >4tsorb-'i 

. -i  a-'t-r  » tr  T *4^' (l>  e>te'  -.5  -^^-v  * fi 


-Tw- 


,'^t'i.ii ''i.rfsb-'ite'-  .Si:c"ior^J'.  ,X.qr<rrch  s® 

.X'i-'T  ■:i4.  ■ .■  „ ...  fTTLh  ■ ..  . ..■/■.■'s:-^^'.,*' 


' i>;Jii-  1 if.ijraxixe 


|i{A;(t>:2'0  -:;7fjsi*7i»'5'ttj|?,9'j£  rawasaiisr 
XS/.5  b1fjs3'--tiX0i 


.»;  ^ J »<^  ...  -••wjfft^j^  ..  -V.-«c»ii*^pe  — *.-«««lP^»-•’^-V';*»■'•^*ir*«•^»  a^;~  '■!■■■  ii-.'^a^A^.'..  .^v. 

:.i-iu;'S,^r^^  (f35>  '5T^iufeA*|*ft£  ««IA 

■rerfri’jfz.--  jX  .■i‘7->>iif'.!;'  ; isinrlsmiv  I 

■ : '■  - ' ’ • ■'  i'"  ..  • 4s 


ffl  '5  »■'»  Ti  V 


>■*.-  .-j 


'V'A*'  »w 

" ' ' \ • i 

w..--  -,-.,*iiS.\4^’' ■! 

ilj 


■yrw. 


ijSilf  ?¥*., 
?S4i'. 


« -'V 


c I 


■■^-  ■ ' ^ - \>- 


